Дано натуральное число n, вычислить n! (0! =1, - вопрос №989515401 от angelina453 15.09.2022 06:32

Question

Информатика: Дано натуральное число n, вычислить n! (0! =1, n! =n*(n- составить программу на pascal.

angelina453 · Answer

var    a : integer;    fac : BigInteger := 1;    begin    readln(a);    if a 0 then for var i := 1 to a do fac *= i;    writeln(a, != , fac);end....