Напишите программу пожалуйста)))дано натуральное число n. вычислить у=1*3*5..(2n-1)
Напишите программу пожалуйста)))дано натуральное число n. вычислить у=1*3*5..(2n-1)
Гость
Ответ(ы) на вопрос:
ГостьProgram Pr1;
uses crt;
var i,n,y:integer;
Begin
clrscr;
y:=1;
readln(n);
if n>=2 then for i:=2 to n do y:=y*((i*2)-1);
writeln(y);
end.
Не нашли ответ?
Похожие вопросы