Дан массив b,состоящий из 7 элементов (-7,1,8,-4,1,6,-5).найти произведение отрицательных элементов массива.
155
370
Ответы на вопрос:
Uses crt; var a: array [1..7] of integer; i,s: integer; begin for i: =1 to 7 do readln (a[i]); clrscr; for i: =1 to 7 do begin write (a[i]: 4); if a[i]< 0 then s: =s+a[i]; end; writeln; writeln (s); end.
Популярно: Информатика
-
DahenkaSi0528.10.2021 23:07
-
SadEngineer30.10.2021 11:24
-
inkakanchiyp0706d27.12.2021 01:48
-
sashakoritnij07.03.2022 20:32
-
206Sasha200010.03.2023 10:15
-
lidochka402.07.2020 21:01
-
77749702.01.2021 20:12
-
kdjdjd1Dndnd16.12.2021 18:12
-
Ещкшсшашсш31.05.2023 19:46
-
ellLMo10.07.2020 21:15