Câu 49. Viết chương trình tính n! với n! được định nghĩa như sau: - 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)... - Lặp gt = gt*n
Giúp tui vs mn ơi tui cần gấp nè
Giúp tui vote 5* nha
Program BTH; uses crt; var a,b:qword; Begin clrscr; Repeat write('Nhap so n: ');readln(a); until a>0; b:=1; while a>0 do begin b:=b*a; a:=a-1; end; writeln('Giai thua cua n la: ',b); readln; end.