Что выведется на экран в результате выполнения фрагмента программы (для n=3):write ('введите целое n = ');   readln (n);   p: = 1;   for i: = 1 to n do    p: = p * i;    write (n, '! = ',p);