Массив А вводится с клавиатуры. Найти суммы чётных количество отрицательных его элементов. Размер произвольный. написать программу с одной функцией и процедурой . За ранее огромное спасибо
Ответы
Ответ дал:
0
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.
Ответ дал:
0
нужна полная программа
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад