Для исполнителя Робот задан представленный алгоритм. Сколько раз выполнится тело цикла в данном алгоритме?

семь раз
один раз
шесть раз

шесть раз у меня есть вопрос почему у тебя минус

var a: integer;

begin

  read(a);

  if a mod 3 = 0 then writeln('делится')

  else writeln('не делится');

  readln;

end.

const n=5; var m: array[1..n] of integer; i,a,b: integer; beginreadln(a,b); for i: =1 to n do readln (m[i]); for i: =1 to n doif i mod 2 = 0 then m[i]: =m[i]+aelse m[i]: =m[i]+b; for i: =1 to n dowriteln ('m[', i,']=', m[i]); end.