Задание

Запишите число, которое будет выведено в результате работы программы:
var s, n: integer;
begin
s := 15;
n := 99;
while n > s do begin
s := s + 3;
n := n - 2
end;
writeln\(n\)
end.