1. Информатика
  2. Дан массив A(N). Найти количество

Дан массив A(N). Найти количество четных элементов и сумму положительных элементов. Пример:
5
2 -4 3 5 -7
ответ:
2 10
напишите фастом

leka777166 leka777166    3   15.12.2020 10:17    0

Ответы
bodik228 bodik228  14.01.2021 10:18

var i,s,a,n,k: integer;

begin

read(n);

s:=0;

k:=0;

for i:=1 to n do begin read(a);  

if a mod 2=0 then k:=k+1;

if a>0 then s:=s+a  end;

  writeln(k,'  ',s)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
urkashkz777 urkashkz777  09.08.2019 19:20
Для хранения произвольного растрового изображения размером 1024x1024 пикселей отведено 512 кбайт памяти, при этом для каждого пикселя хранится двоичное число - код цвета...
MDasha45 MDasha45  09.08.2019 19:20
Задана следующая шкала эффективности внедрения технологий(%). 0-10 – невысокая; 11-25 – средняя; 26-50 – высокая; 51 – 100 – высокая; 100 – революционная. составить программу,...
Danil21K Danil21K  09.08.2019 19:20
Решить со всеми расчетами и полностью. 1. возведи в квадрат 2. вычти 4 первая из них возводит число на экране во вторую степень, вторая – уменьшает число на 4. составьте...
atrocities22 atrocities22  30.09.2019 03:50
(a =b) and (a=b-1) при a=2, b=4...
ulianalypka ulianalypka  30.09.2019 03:50
Укажите команды относящие к форматированию текстовой информации? 1.исправить ошибку.. 2 изменить цвет текста. 3 вырезать фрагмент текста. 4 устоновить размер букф...
какулькаТВ какулькаТВ  30.09.2019 03:50
Текст составлен с использованием 64 символьного алфавита. количество символов в сообщении 80, найдите объем сообщения...
izibaevsergei izibaevsergei  30.09.2019 03:50
Нужна по паскаль задана матрица a(k,l) найти сумму элементов в каждом ряду с парным индексом и создать с них одномерный массив...
Sakura171 Sakura171  24.04.2020 11:21
Какая функция позволяет узнать код символа...
PicaChuShiK PicaChuShiK  24.04.2020 11:21
Информатика чему будет равна переменная с после выполнения фрагмента программы? ​...
nikasimonok2007 nikasimonok2007  12.06.2019 01:50
Напишите оператор присваивания, в результате выполнения которого целочисленной переменной h присвоится значение цифры, стоящей в разряде сотен в записи положительного...

Популярные вопросы