Найти 18+19+20+21+22+23 с использованием оператора цикла.

Ответы

Ответ дал: ilya777777
0

var
s, i:integer;

begin
s := 0;
for i := 18 to 23 do
s := s + i;
write(s)
end.

Похожие вопросы