Задание 7 Вариант 1 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
Решение #1
![Изображение ответа 7. Напишите программу, сравнивающую сумму чётных и сумму нечётных элементов массива. Проверьте работу программы на заданном массиве А = {7, 25, 45, 10, 17, -61, 10, 5,... Изображение 7. Напишите программу, сравнивающую сумму чётных и сумму нечётных элементов массива. Проверьте работу программы на заданном массиве А = {7, 25, 45, 10, 17, -61, 10, 5,...](/reshebniki/informatika/11/WBbosova/images1/sam4/1/7.png)
![Загрузка...](/pic/zapret_pravo.png)
Рассмотрим вариант решения задания из учебника Босова, Босова, Аквилянов 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.
Сумма каких элементов больше? нечетных
*размещая тексты в комментариях ниже, вы автоматически соглашаетесь с пользовательским соглашением