Cho số nguyên n, hãy tính n! Dữ liệu nhập: - Là số nguyên n (1 ≤ n ≤ 17) Dữ liệu xuất: - Giá trị của n! . Chú ý rằng số này có thể rất lớn

trieuvankim

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 26 xem

1 trả lời

Thích Trả lời

domaihongngoc

Vòng for...do

program bai_giai;
uses crt;
var n,i:byte;
t:int64;
begin
clrscr;
write('Nhap n: '); readln(n);
t:=1;
for i:=1 to n do t:=t*i;
write(t);
readln;
end.

Vòng while...do

program bai_giai;
uses crt;
var n,i:byte;
t:int64;
begin
clrscr;
write('Nhap n: '); readln(n);
t:=1; i:=1;
while i<=n do
begin
t:=t*i;
i:=i+1;
end;
write(t);
readln;
end.

Kết quả thực sự rất lớn, cho dù là integer, longint lớn hơn thường dùng cũng không đủ để có kết quả. Vì thế phải dùng kiểu dữ liệu lớn hơn trong kiểu số nguyên như là qword, int64,...

Vote (0) Phản hồi (0) 2 năm trước

trannam1982hp

uses crt;
var n,i:byte;
t:qword;
begin
clrscr;
readln(n);
t:=1;
for i:=2 to n do t:=t*i;
writeln(t);
readkey;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

giải nhanh giúp e ii ạ. thankssss

😞 Cái buồn bao trùm cả ngày mai👁💧👄💧👁 Calli : " Baji Keisuke "

- Fe tác dụng với O2 tạo thành: + FeO khi nào? + Fe2O3 khi nào? + Fe3O4 khi nào?

Lúc 7h một người đi bộ từ A đến B với vận tốc 4km/h .Lúc 9h một người đi xe đạp từ A đuổi theo với vận tốc 12km/h Lập pt chuyể động

Vẽ mầm cute nka :33 Ko app,có màu NL:Hóng cậu ấy nek :33

mn làm hộ mình bài này hứa vote thank

Câu 2 Nguyên tử R có tổng số hạt là 46 , trong đó có số hạt notron nhiều hơn số hạt proton là 1 hạt . Xác định số khối của R Câu 3 Nguyên tố cacbon có 2 đồng vị 12/6 C chiến 98,89% và 13/6 C chiếm 1,11% . Xác định nguyên tử khối trung bình của cacbon

Giúp mik bài 2 vs ạ, mik đg cần liền bây giờ. Cảm ơn ạ

giải hộ cho 5 sao nhớ ghi rõ ràng :))

mong giúp ......................

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến