Дано n целых чисел, сгенерированных случайным образов - вопрос №8256693100100 от nuriknur2001 19.10.2021 06:02

Question

Информатика: Дано n целых чисел, сгенерированных случайным образов в диапазоне -100, 100. найти произведение всех чисел 5.

nuriknur2001 · Answer

Vari, m, s, k: integer;beginfor i := 1 to 10 dobeginm := Random(-100, 100);writeln(m);end;writeln( here );if m 0 thenbegins := 0;for k := m to m dos:=s+m;writeln(s);endend....

Дано n целых чисел, сгенерированных случайным образов в диапазоне -100, 100. найти произведение всех чисел > 5.