ПОМОГИЕТ ПОЖАЛУЙСТА,ДАЮ МНОГО БАЛЛОВ
Дан одномерный массив из N элементов (количество элементов вводится с клавиатуры во время выполнения программы). Элементы массива вводятся с клавиатуры и могут принимать целочисленные значения от -100000 до 100000. Напишите программу, которая определяет и выводит на экран количество положительных четных элементов массива и количество отрицательных нечетных элементов массива
Ответы
Ответ дал:
0
program mas_kol_pol_kol_otr;
var
i,kolo,kolp,n:integer;
a:array[1..1000000] of integer;
begin
read(n);
kolo:=0;
kolp:=0;
for i:=1 to n do
begin
read(a[i]);
if (a[i]>0)and(a[i]mod 2=0)then
inc(kolp);
if (a[i]<0)and (a[i]mod 2<>0) then
inc(kolo);
end;
write(kolp,' ',kolo);
end.
Похожие вопросы
2 года назад
2 года назад
8 лет назад
9 лет назад