Дано натуральное число n, вычислить n! (0! =1, n! - вопрос №989515401 от kuanyshbek2003 11.11.2022 03:34

Question

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

kuanyshbek2003 · 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....