Найти 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.
Не нашли ответ?
Похожие вопросы