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

Question

Информатика

Веруха

6 октября, 15:30

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

+4

Ответы (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.