3)Запишите число, которое будет выведено в итоге работы программы:var s, n:

3)Запишите число, которое будет выведено в итоге работы программы:
var s, n: integer;
begin
s := 15;
n := 0;
while 50 lt; s*s do begin
s := s - 1;
n := n + 2
end;
writeln(n)
end. ПОМОГИТЕ ПОЖАЛУЙСТА