В целочисленной массиве a, состоящим из 10 элементов от - 20 до 20, найти сумму положительных элементов кратных 3, с помощью рандома.

Question

Информатика

Аврея

21 августа, 15:48

В целочисленной массиве a, состоящим из 10 элементов от - 20 до 20, найти сумму положительных элементов кратных 3, с помощью рандома.

+1

Ответы (1)

Знаете ответ на вопрос?

Ноня · Answer 1

Var s, a, t: integer; begins : = 0; randomize; for t : = 1 to 10 dobegina : = random (41) - 20; if a mod 3 = 0 then s : = s + a; end; writeln (s) ; end.