ПОМОГИТЕ ПОЖАЛУЙСТА : Определите, что будет напечатано в результате работы следующего...

Question

ПОМОГИТЕ ПОЖАЛУЙСТА :
Определите, что будет напечатано в результате работы следующего фрагмента программы:
var n, s: integer;
begin
n := 24;
s := 0;
while n <= 28 do begin<br> s := s + 20;
n := n + 2
end;
write(s)
end.

Answer 1

Тело цикла будет выполнено 3 раза при n = 24, 26, 28. По шагам выглядит так:
s = 0  n = 24
s = 20  n = 26
s = 40  n = 28
s = 60
Ответ: s = 60

Answer 2

На экран выведется это:
20