1. напишите программу, которая для последовательности натуральных чисел определяет их сумму. Программа получает на вход количество чисел в последовательности и сами числа 2. Измените программу так, чтобы определялось произведение чисел. 3. измените программу так, чтобы определялось количество чисел, заканчивающихся на 8
1 и 3 пункты var n, s: integer; begin WriteLn('Введите последовательность. Конец ввода - 0'); repeat ReadLn(n); if (n > 0) and ((n mod 10 = 8)) then s := s n until n = 0; WriteLn('Сумма чисел, оканчивающихся на 3 или 9 = ', s); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
