Question

Дан массив,состоящий из 20 случайных чисел. Подсчитайте сумму элементов кратных 5

Answer 1

ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Матем ИЗ "...ОтделыМатем";

ПЕР
  массив: РЯД 20 ИЗ ЦЕЛ;
  сч, сумма: ЦЕЛ;

УКАЗ
  ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
    массив[сч] := УЗК(ВШИРЦЕЛ(Матем.случ() * 100))
  КОН;
  сумма := 0;
  ОТ сч := 0 ДО РАЗМЕР(массив) - 1 ВЫП
    ЕСЛИ массив[сч] ОСТАТОК 5 = 0 ТО УВЕЛИЧИТЬ(сумма, массив[сч]) КОН
  КОН

КОН Задание.