Запишите число, которое будет выведено в результате работы программы:
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.