Составить алгоритм вычисления произведения 6 чисел введённых с клавиатуры !

Savelijbih Savelijbih    3   22.06.2019 03:00    0

Ответы
volden05 volden05  17.07.2020 12:47
Program mnogohodovochka;
var
a,b,c,d,e,f:integer;
begin
writeln('vvedite 6 chisel');
readln(a,b,c,d,e,f);
writeln('proizvedenie= ', a*b*c*d*e*f);
end.
ПОКАЗАТЬ ОТВЕТЫ
Uoywex Uoywex  17.07.2020 12:47
Var a,s,i:integer;
begin
s:=1;
for i:=1 to 6 do
begin
readln(a);
s:=s*a;
end;
write(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика