• помогите составить программу, которая заполняет массив a [ 1..10] случайными целыми числами в диапозоне от 1 да 10 и вычесляет произведения элементов массива с нечетными значениями

Ответы 1

  • ОТДЕЛ Задание+;ИСПОЛЬЗУЕТ  Вывод ИЗ "...\Отделы\Обмен\", Матем ИЗ "...\Отделы\Числа\";ПЕР  a: РЯД 10 ИЗ ЦЕЛ;  сч: ЦЕЛ;  произведение: ЦЕЛ;УКАЗ  ОТ сч := 0 ДО РАЗМЕР(a) - 1 ВЫП    a[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 9)) + 1  КОН;  произведение := 1;  ОТ сч := 0 ДО РАЗМЕР(a) - 1 ВЫП    ЕСЛИ НЕ ЧЕТ(a[сч]) ТО      произведение := произведение * a[сч]    КОН  КОНКОН Задание.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years