Дан массив из N элементов определить сколько элементов массива начинаются и кончаются одной и той же цифрой (Паскаль)
begin
var n := ReadInteger();
var a := ReadArrInteger(n);
var Count := 0;
foreach var x in a do
var s := x.ToString;
if s[1] = s[s.Length] then Count += 1
end;
Print(Count)
end.
спасибо большое, вот только половину мы не проходили ещё