Giúp em phần này với!

[nhat_truong]

@QuangDiem
Ôi, nhứt mắt quá. Chả hiểu gì cả
Bạn hãy trình bày ý tưởng của bạn
Còn viết code thì mình có thể tự mò được

Nhân tiện cho hỏi
Máy mình xài Graph ko được
Mình bảo đảm code đúng, graph ko vấn đề (Vì mình đã thử cài trên máy khác, chạy êm ru). Mình nghĩ chắc do cấu hình máy
Nếu bạn biết vấn đề của mình xin chỉ giáo

còn nữa, thủ tục sound của crt ko phát ra âm thanh. chả biết vì cái gì. lúc trước xài được sound, sau vài lần sửa máy thì toi luôn

[phuongphamuui]

function gt(n:integer):longint;
begin
gt:=gt(n-1);
end;

[love-nt-forever]

đố các bạn tính được giai thừa của 1 số mà kết quả lớp hơn giới hạn của longint ý, Ai có ý tưởng hay thì PM cho mình với.( gợi ý nhá: bài này dùng xâu là tốt nhất)

[kha1995]

Cái này thì đơn giản thôi mà!
nếu bạn nhập n=5 thì giá trị n sẽ thay thế giá trị m tức là gt(m:integer) bây giờ sẽ là gt(n:integer),khi đó gt:=m*gt(m-1) sẽ là gt:=n*gt(n-1), tức là trong chương trình con nó dùng biến m nhưng khi nhập số vào thì nó sẽ tính theo n; khi đó n=m