Bài 8. Lặp với số lần chưa biết trước

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 ạ!

Minh Lệ
15 tháng 3 2021 lúc 19:02

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.

Bình luận (0)

Các câu hỏi tương tự
Xem chi tiết
daukhacgiabao
Xem chi tiết
Dung Nguyễn
Xem chi tiết
Xem chi tiết
Trần Linh Trang
Xem chi tiết
Nguyễn Phan Thanh Mai
Xem chi tiết
Dolce and garbana
Xem chi tiết
Nhi Nguyễn
Xem chi tiết
P.Thúy
Xem chi tiết