Question

Определите, что будет напечатано в результате выполнения программы:

var n, s: integer;

begin

n := 0;

s := 0;

while s <= 36 do

begin

s := s + 8;

n := n + 5

end;

write(n)

end.

Answer 1

Ответ: 25

В результате выполнения программы будет написано: 25