Помогите с информатикой пожалуйста!(Срочно и очень важно) Используя оператор цикла, составить АЛГОРИТМ вычисления произведения: F=3*6*9*12*.....*3N, где N выводится.
Answers & Comments
vladmor
//Pascal var i,n:integer; f:word; begin f:=1; readln(n); for i:=1 to n do f:=f*3*i; writeln(f); end.
Answers & Comments
var i,n:integer;
f:word;
begin
f:=1;
readln(n);
for i:=1 to n do
f:=f*3*i;
writeln(f);
end.