Дано натуральное n.вычислить y=1*3*(2n-1).программа в паскаль абс.

тьпнли тьпнли    3   05.06.2019 19:00    0

Ответы
mamarozovap0c9td mamarozovap0c9td  01.10.2020 20:00
Var n,k,i:integer;
y:longint;
begin
readln(n);
k:=1;
y:=1;
for i:=1 to n+1 do begin
y:=y*k;
k:=k+2;
end;
writeln(y);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика