Задание
Запишите число, которое будет напечатано в результате выполнения следующей программы:
var s, n: integer;
begin
s := 300;
n := 100;
while s - n >= 100 do
begin
s := s + 20;
n := n + 30
end;
writeln\(s\)
end.