Регистрация
Оаоагигвшпоа
31.05.2022 23:57
Информатика
Есть ответ 👍

. Дана ненулевая последовательность, заканчивающаяся нулем. Вывести на экран сумму всех положительных элементов последовательности. на паскале

179
421
Посмотреть ответы 1

Ответы на вопрос:

6ahah9812
6ahah9812
4,4(46 оценок)
Var s,i: integer; begin for i: =1 to 100 do  if not(i mod 2 = 0) then  s: =s+i;   writeln(s);   end.

Популярно: Информатика