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

Написать программу для нахождения произведения нечётных чисел в диапозоне от 1 до n.
Гость
Ответ(ы) на вопрос:
Гость
var n,i,k:integer; begin; readln(n); k:=1; for i:=1 to n do if i mod 2<>0 then k*=i; writeln(k); end. 
Не нашли ответ?
Ответить на вопрос
Похожие вопросы