1. Информатика
  2. Дан массив из 10-ти элементов

Дан массив из 10-ти элементов ,который вводит пользователь.НЕобходимо посчитать сумму элементов с четными и нечетными значениями.Отдельно вывести с четными и нечетными индексами.Паскаль

Z1439373 Z1439373    2   25.02.2021 20:02    0

Ответы
nuriksabirjan nuriksabirjan  27.03.2021 20:02

var

 c1,c2,a:integer;

begin

 for var i := 0 to 9 do

 begin

 readln(a);

 if a mod 2 = 0 then c1 += a

 else c2 += a;

 end;

write(c1,' - ',c2);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
дарьякозырева дарьякозырева  19.09.2019 21:10
Правила записи арифметических выражений (записать ax^2+√ax^3+sin x/ cos x^2)...
abduabdu2015 abduabdu2015  19.09.2019 21:10
Найти последнюю цифру числа 6^n, где n- целое число. на паскале...
limswildep09q0c limswildep09q0c  19.09.2019 21:10
Вкакую память загружается запущенная программа для работы с ней ?...
SkokivaAlina SkokivaAlina  03.11.2020 07:04
ЗАДАНИЕ ОТ УЧИТЕЛЯ 1. Устройство для вычислений, использовавшееся в ХVІІ в. А) Суммирующая машина Паскаля В) Мейнфрейм. С) Абакус. D) Марк-1. Е) Персональный компьютер....
OFFICIALLL OFFICIALLL  03.11.2020 07:02
1. Что такое операционная система? 2. Какие программы составляют основу ОС? 3. Каковы основные компоненты операционной системы и каково их назначение? 4. Операционная система...
Иван7962 Иван7962  03.11.2020 07:02
Скорость передачи данных через Wi-Fi соединение равна 5 Кбит/cек. Сколько бит информации можно передать за 2 секунды?В овете указать ТОЛЬКО число, без единиц измерения.​...
anaStasyaplus anaStasyaplus  23.09.2019 18:09
Написать программу, которая в одномерном массиве, заданном вводом данных с клавиатуры заменяет все числа в массиве заданным числом....
sofiamazanova sofiamazanova  10.01.2022 23:09
1.Из полного бака, вместимость которого 200 л, через открытый кран вытекает вода со скоростью 5 л в минуту. Количество воды V, остающейся в баке, является функцией от времени...
Колязнаток Колязнаток  18.10.2021 19:56
Айжан - 8 «А»сынып оқушысы. Ол үй тапсырмасын ертең 11 қыркүйекке дейін тапсыруы керек, бірақ ол қателесіп, kundelik.kz сайтындағы кестені шатастырады да, 12 қыркүйектегі...
ksusha20032 ksusha20032  18.10.2021 19:56
Шифрлердің крипто тұрақтылығы...

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