Факториал числа(паскаль)

[Кьюби]

Здраствуйте! Помогите пожалуйста с кодом для программы.
Задание: Пользователь задаёт число, программа находит факториал этого числа.
Заранее спасибо!

[Sasha_Smirnov]

Вот что значит правильно назвать тему!

Прокрутите вниз — и ответ вам как на блюдечке.

[Grag]

Сообщение от Кьюби

Здраствуйте! Помогите пожалуйста с кодом для программы.
Задание: Пользователь задаёт число, программа находит факториал этого числа.
Заранее спасибо!

Var
  X:word;
  Fact:real;
  i:word;
begin
  Readln(x);
  Fact:=1;
  for i:=1 to X do
    Fact:=Fact*i;
  writeln('Factoril=',Fact)
end.