Написать текст программы для подсчета произведения 10 чисел, введённых с клавиатуры.

melashich2004 melashich2004    1   03.09.2019 05:00    0

Ответы
7575757575 7575757575  06.10.2020 13:57
Program n1;
var i,a: integer;
p: real;
begin
p:=1;
for i:=1 to 10 do
begin
readln(a);
p:=p*a;
end;
write(p);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Математика