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

Задание:

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

Решение:

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

Знаете другой ответ?

Отправить свой ответ