6e будет первоначальной цифрой потом идёт:11 1017121213 и всё всем помогаю чао
Вот пожалуйста что не понятно говорите
ответ на данный вопрос будет:а
===== PascalABC.NET =====
begin
var n := 22;
var a := ArrRandom(n, 0, 12);
a[a.High] := 11;
a.Println;
var s := 0;
for var i := 0 to a.High do
begin
if a[i] > 10 then
$'a[{i + 1}] = {a[i]} '.Print;
if a[i] mod 4 = 0 then
s += a[i]
end;
Writeln;
Println('Сумма', s)
end.