Viết chương trình tính n! với yêu cầu sử dụng hàm để tính giai thừa.
Trả lời
Tổng hợp câu trả lời (1)
NguyenHieu
12:11:09 24-Nov-2021
Program Giai_thua_Ham;
uses crt;
var n: longint;
Function Giai_Thua(n:longint):longint;
Var GT:Longint;
begin
GT:=1;
while n > 0 do
begin
GT:=GT * n;
n:=n-1;
end;
Giai_thua:=GT;
end;
begin
clrscr;
write('Nhap n: '); readln(n);
write(n,'!=',Giai_thua(n));
readln
end.
Hãy giúp mọi người biết câu trả lời này thế nào?