Сколько раз выполнится цикл? Ответ введите в числовой форме.
Programm cikl;
var a: integer;
begin
a:=3;
repeat
a:=a+1;
writeln('a=',a);
until a>5
end.

Войти через: