Question

Câu hỏi:  Viết chương trình tính n!

_______________________________________

Mọi người giúp mình với, mình đang cần gấp ạ!

Answer 1

Program HOC24;

var t: longint;

n,i: integer;

begin

write('Nhap n= '); readln(n);

t:=1;

for i:=1 to n do t:=t*i;

write(n,'! =',t);

readln

end.