Определите, что будет напечатано в результате работы следующего фрагмента программы:
var n, s: integer;
begin
n := 1;
s := 0;
while n <= 20 do begin
s := s + 33;
n := n + 1
end;
write(s)
end.

Ответы

Ответ дал: D9tel
0
Получится 660
while n <= 20 do begin
s := s + 33;
n := n + 1
Это цикл который будет повторяться 20 раз

Вас заинтересует