Задать случайным образом 7 чисел в интервале - вопрос №71104879321 от kopanenkoanutaoyp3as 12.10.2021 08:01

Question

Информатика: Задать случайным образом 7 чисел в интервале от 1 до 10. найти их произведение и среднее арифметическое.

kopanenkoanutaoyp3as · Answer

var i,x,sum,ar:integer;randomize;For i=1 to 7 do beginx:=random(11);sum:=sum+x;end;ar:=sum/7;...