Запишите число, которое будет напечатано в результате выполнения следующей программы.

var s, n: integer;
begin
s := 100;
n := 300;
while s + n <= 600 do
begin
s := s + 40;
n := n − 20;
end;
writeln\(s\)
end.