Срочно очень сделайте
Var res : BigInteger; begin res := 1; var n := ReadInteger('Введите n:'); for var i := 1 to n do res *= i; writeln('Факториал равен ', res) end.
мне нужно это написать циклом
это не так
Девушка, это и есть цикл for
что значит Biginteger?