Question

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

var n, s: integer;
begin
n := 4;
s := 0;
while n <= 8 do
begin
s := s + n;
n := n + 1
end;
write(s)
еnd.

Answer 1

Ответ:

30

0+4+5+6+7+8=30