Описать
функцию Fact (n)  вещественного типа  вычисляющую значение факториала n!=1*2*3*..*n (n>0, параметр целого типа). С помощью этой функции найти
факториалы пяти данных целых чисел.

Вот программа:var x:integer;function Fact(n:integer): integer;var i,sum:integer;begin sum:=1; for i:=1 to n do  sum:=sum*i; result:=sum;end;begin  readln(x); writeln(Fact(x));end.--------->С помощью этой функции найти факториалы пяти данных целых чисел.                         - Вы не написали каких чисел