Напишите функцию Function Factor\(N: Integer\): LongInt; , вычисляющую значение N!

Входные данные
Вводится 1 число N \(целое неотрицательное\).

Выходные данные
Необходимо вывести значение N!

Примеры
входные данные
5
выходные данные
120