Задание 7 Вариант 1 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Решение #1

Изображение 7. Напишите программу, сравнивающую сумму чётных и сумму нечётных элементов массива. Проверьте работу программы на заданном массиве А = {7, 25, 45, 10, 17, -61, 10, 5,...
Приложенные файлы
Загрузка...

Рассмотрим вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:
7. Напишите программу, сравнивающую сумму чётных и сумму нечётных элементов массива. Проверьте работу программы на заданном массиве А = {7, 25, 45, 10, 17, -61, 10, 5, 1, -40, 22}.
Сумма каких элементов больше?

program s4_v1_7;
var
a: array[0..10] of integer;
i, sc, sn: integer;
begin
sc := 0; sn := 0;
writeln('ввод массива');
for i := 0 to 10 do
begin
read(a[i]);
if (a[i] mod 2 = 0) then sc := sc + a[i]
else sn := sn + a[i]
end;
if sc = sn then writeln('суммы равны ')
else
if sc > sn then writeln('сумма четных больше')
else writeln('сумма нечетных больше')
end.
Сумма каких элементов больше? нечетных
*Цитирирование задания со ссылкой на учебник производится исключительно в учебных целях для лучшего понимания разбора решения задания.

Похожие решебники

*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением