Написать программу (на ABC pascal)…

Написать программу (на ABC pascal), которая находит сумму четных цифр и произведение нечетных чисел в диапазоне от 1 до 10.

в избранное

fanso

11 марта 2023

Как-то так, если синтаксис помню: sum: =0; mul: =1; for index: =1 to 10 dobegin if (index mod 2=0) then begin sum: =sum+index; end; else begin mul: =mul*index; end; end;

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Смотрите также:

Схемы, карты, фотографии это?

Когда в школе объявили день вежливости…?

Массив из 10 элементов. Формируется случайным образом из интервала [-35,25]

1. В корзине лежат 32 красных шара. Сколько информации содержит сообщение о том, чтоиз корзины достали красный шар?

Число -34 при двухбайтовом способе записи числа в память компьютера будет представлено машинным словом:…

Племя Мульти пишет письма, пользуясь 16-символьным алфавитом. Племя Пульти пользуется 32-символьным алфавитом

Для шифрования числового кода решили использовать изображение круглых часов с циферблатом и с тремя стрелками

Дана прямоугольная матрица n*m. Найти наибольшие элементы в строке и среди них найтинаименьший. С

В саду 100 фруктовых деревьев 24 яблони и 21 груша. В какой системе счисления посчитаныдеревья&

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: