Question

PASCAL: Viết chương trình giai thừa n số.

Ví dụ: nhập n = 6

Hiện thị kết quả = 1x2x3x4x5x6 = 720

Lưu ý: phải sử dụng xâu hoặc mảng trong trường hợp n>10

Answer 1

*Hướng dẫn:

Gán tổng S với giá trị ban đầu là 0

- Sử dụng để lấy từng chữ số của số tự nhiên N bằng cách:

Lặp trong khi mà N còn > 0 thì

+ Gán k là chữ số cuối cùng của N.

+ Tiến hành cắt chữ số cuối cùng của N đi bằng việc lấy N chia cho 10.

+ Cộng dồn S: = S + k

Lặp lại cho đến khi N = 0 thì dừng