clc
clear
disp('Zhoria Renfus')


#Factorial

T= 10000
n=1
factorial_n= 1

while factorial_n <= T
 n= n+1;
 factorial_n= factorial_n * n;
end 
n
factorial_n