Регистрация
vika36voronezhskaya
20.11.2022 05:07
Информатика
Есть ответ 👍

Вычислить сумму четных и произведение нечетных чисел в из n введенных.

204
350
Посмотреть ответы 2

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

Ови11
Ови11
4,5(21 оценок)
Var     n,i: integer;     s,s1: longint; begin writeln('введите n: '); readln(n); for i: =1 to n do if i mod 2=0 then s: =s+i else s1: =s1+i; writeln('сумма четных: ',s); writeln('сумма нечетных: ',s1); readln end.
Пес24
Пес24
4,4(40 оценок)

Вроде 16, но это не точно

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