Массив а вводится с клавиатуры. найти суммы чётных количество отрицательных его элементов. размер произвольный. написать программу с одной функцией и процедурой . за ранее огромное

Loseva72 Loseva72    2   12.07.2019 22:20    1

Ответы
adadurovf adadurovf  03.10.2020 02:10
Program primer;var I,k,d,n: integer;A: array[1..100] of integer; beginfor i:=1 to n doif a[i] mod 2=0 then k:=k+1;if a[i]<0 then d:=d+1;writeln(k,' количество четных членов массива');writeln(d,' количества отрицательных членов массива');end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика