Question

Определите, при каком наибольшем положительном введённом значении переменной s программа выведет трёхзначное число.


var s, n: integer;
begin
readln (s);
n := 200;
while s div n >= 2 do
begin
s := s + 5;
n := n + 5
end;
writeln(s)
end.​

Answer 1

Ответ:

699

Объяснение: