Question

Напишіть програму Факторіал числа, в якій комп'ютер загадує випадкове число від 1 до 10 та знаходить факторіал цього числа. А потім виводить загадане число та його факторіал. (Факторіал натурального числа п добуток натуральних чисел від 1 до и включно, позначається !. Наприклад, 5! 1*2*3*4*5=120).даю 50 б​

Answer 1

##

function Fact(n: integer): integer := n <= 1 ? 1 : n * (Fact(n - 1));

var n := ReadInteger('n =');

Println($'{n}! = {Fact(n)}')