Главная страница Помогите написать программу в паскале! Написать программу в паскале: В одномерном массиве из 10 целых чисел вычислить сумму четных чисел …
Помогите написать программу в паскале! Написать программу в паскале: В одномерном массиве из 10 целых чисел вычислить сумму четных чисел …
Автор Беликова Ирина На чтение 1 мин Просмотров 4
Вопрос от пользователя: Катяха
Помогите написать программу в паскале!
Написать программу в паскале:
В одномерном массиве из 10 целых чисел вычислить сумму четных чисел …
Ответ: Юнонка
Var a: array[1 … 10] of integer; sum, i: integer; beginsum:=0; for i:=1 to 10 do begin readln (a[i]); if a[i] mod 2=0 then sum: = sum+a[i]; end; write (sum); end.
Беликова Ирина
Учитель физики, информатики и вычислительной техники. Победитель конкурса лучших учителей Российской Федерации в рамках Приоритетного Национального Проекта "Образование".