Question

Вывести на экран значение n!, n – целое число, вводимое с клавиатуры.

Answer 1

var
    i, n: integer;
    nf: longint;

begin
    readln(n);
    nf := 1;
    for i := 1 to n do
        nf := nf * i;
    writeln(nf);
end.

Answer 2

немного не так. не использую var , nf:longin; writeln(nf).я так поняла что здесь надо использовать setlocale iostream match, но как это все связать не знаю.