Задание

Определите, что будет напечатано в результате работы следующей

программы. Текст программы приведен на языке программирования Pascal.

var s, n: integer;

begin

s := 0;

n := 75;

while s + n < 150 do

begin

s := s + 15;

n := n - 5

end;

writeln(n)

end.