Вопрос Составьте программу для задачи: Найти произведение 10 любых вещественных чисел из отрезка от -10 до

[прас]

Составьте программу для задачи: Найти произведение 10 любых вещественных чисел из отрезка от -10 до 10. ПАСКАЛЬ

 

[Владфы]

var i:integer; a,p:real; begin p:=1; for i:=1 to 10 do begin a:=-10+21*random; p:=p*a; write(a:6:3,) end; writeln; writeln(p:10:2) end.

 

[щдлвак]

в школах паскаль изучают - тупизм!