Регистрация
dgafar27oy9omz
26.03.2020 01:31
Информатика
Есть ответ 👍

Написать программу пользователь вводит 5 целых чисел,программа находит сумму всех отрицательных и произведение всех положительных чисел

293
437
Посмотреть ответы 2

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

Carolina1Cerry
Carolina1Cerry
4,4(96 оценок)
Uses crt; var i,s,p,a,n: integer; begin    p: =1;     write('введите кол-во чисел  ');   readln(n);   for i: =1 to n do begin                              write('введите ',i,'число: ');                               readln(a);                                 if a< 0 then s: =s+a                              else p: =p*a                            end;   writeln('сумма отрицательных чисел равна: ',s);   writeln('произведение всех положительных чисел равно: ',p)end.как-то так)
LordКавайность
LordКавайность
4,4(57 оценок)

Вот код

Объяснение:

n = int( input( ))

sum = 0

for i in range( 0, n):

   a = int( input())

   if( a < 0):

       sum += a * a

print( sum)

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