elenanovikova21

16.02.2020 22:54 •  Информатика

Определите, при каком наибольшем положительном введённом значении переменной 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.​