Viết chương trình tính n! với n! được định nghĩa như sau:
– n! = 1 với n = 0
– n! = 1.2.3…n (Tích của n số từ 1 đến n).
Yêu cầu: Sử dụng vòng lặp với số lần chưa biết trước:
Viết chương trình tính n! với n! được định nghĩa như sau:
– n! = 1 với n = 0
– n! = 1.2.3…n (Tích của n số từ 1 đến n).
Yêu cầu: Sử dụng vòng lặp với số lần chưa biết trước:
Hướng dẫn:
– Có thể viết lại: n! = n.(n-1)… 3.2.1.
– Lặp gt = gt*n; n = n-1 với điều kiện n>0.
Mã chương trình:
Program Giai_Thua_while;
uses crt;
var n, gt:longint;
begin
clrscr;
Repeat
write(‘Nhap so n: ‘);readln(n);
until n>0;
gt:=1;
while n>0 do
begin
gt:=gt*n;
n:=n-1;
end;
writeln(‘Giai thua cua n la: ‘,gt);
readln
end.
Nhận xét: Tiết kiệm được một biến i để chạy nhưng làm thay đổi n nên khi xuất ra chỉ
có thể xuất một câu chung chung “Giai thua cua n la:”
CHÚC BN HỌC TỐT # NGUYỄN THANH BẢO KHA @ I LOVE YOU