Дана блок-схема алгоритма обработки целочисленного массива A из 8 элементов. Чему будет равна переменная cnt после завершения работы алгоритма, если изначально: A = {1, 2, 3, 3, 1, 3, 2, 1}. Индексация элементов массива начинается с 1. Оператор mod обозначает остаток от деления. В ответе укажите число.

program xxx;

  var n, c, d, e, s : integer;

begin

    write('введите число');

    readln(n);

    c: = n div 100;

    d: =(n div 10) mod 10;

    e: = n mod 10;

    s: = c + d + e;

    writeln('сумма чисел =', s);

    readln

end.

program p; uses crt,graph; var d,m: integer; beginclrscr; initgraph(d,m,''); setcolor(green) ; line(200,420,300,420); line(300,420,250,330); line(250,330,200,420); line(200,330,300,330); line(300,330,250,240); line(250,240,200,330); line(200,240,300,240); line(300,240,250,140); line(250,140,200,240); readkey; end.

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

end.чему в школе то  

var i: integer; begin  for i: = 2 to 14 do      writeln(i*i); end.