Question

52) Запишите число, которое будет выведено в результате работы программы:
var s, n: integer;
begin
s := 25;
n := 5;
while 500 < s*s do begin
s := s - 1;
n := n + 2 end;
writeln(n)
end.

Answer 1

Ответ:

11

Объяснение:

Пока s квадрат больше 500 н увеличивается на 2