10 б
программирование
написать программу, которая в одномерном массиве целых чисел из 10 элементов находит сумму элементов четных по значению и выводит результат на экран.
rushsh1
1
27.09.2019 17:32
0
Другие вопросы по теме Информатика
Маликакот
16.09.2019 09:50
Нурюс
18.05.2019 22:40
qwem11
18.05.2019 22:30
ЛюБИмИЦа55
05.12.2020 18:34
Belatrissa11
05.12.2020 18:32
Катерина122333
05.12.2020 18:32
альбина330
22.02.2022 07:04
Популярные вопросы
- решить производные сложной функции...
2 - Очень Установите соответствие между историческим деятелем и историческими...
2 - Христианские ценности в произведении Пастернака Доктор Живаго...
2 - Как изменится разность двух чисел если из вычитаемого вычесть...
3 - Привет! Кому изменила эпоха возрождения? на букву р...
3 - Назвіть джерела,з яких відомо,що Андрій і Лев ІІ підтримували...
2 - Обьясните логические цепочки 1.распределение князьями своих владений...
3 - Яку масу етанолу було добуто з 1т картоплі, в якій масова частка...
1 - Объясните почему тут trying ? А не другая форма глагол try)...
2 - Как зависят полезные ископаемые Евразии от рельефа?...
1
var A:array[1..10] of integer;
i,sum:integer;
begin
writeln('Введите значения массива');
for i:=1 to 10 do
readln(A[i]);
for i:=1 to 10 do
if A[i] mod 2=0 then sum:=sum+a[i];
write('ответ= ',sum);
end.