Запишите число, которое будет напечатано в результате выполнения следующей программы. Можно с объяснением.
4)Запишите число, которое будет напечатано в результате выполнения следующей программы:
var n, s: integer;
begin
n := 1;
s := 0;
while n <= 300 do begin
s := s + 30;
n := n * 5
end;
write(s)
end.