Регистрация
olga000064
04.12.2021 05:36
Информатика
Есть ответ 👍

Составьте программу которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10 и находит сумму элементов с четными значениями и количество элементов с нечетными значениями

243
272
Посмотреть ответы 2

Ответы на вопрос:

dasha5282
dasha5282
4,8(40 оценок)
Var a: array [1..10] of integer; i,sum,kol: integer; begin for i: =1 to 10 do a[i]: =random(10)+1; for i: =1 to 10 do write(a[i],' '); writeln; for i: =1 to 10 do if a[i] mod 2=0 then sum: =sum+a[i] else kol: =kol+1; writeln(sum); writeln(kol); end.
Subota
Subota
4,6(33 оценок)
Попробуй поискать на другом сайте!

Популярно: Информатика