Các pro làm giúp em bài này với! Nhập số nguyên dương m ( 100 < m < Maxlnt = 32767 ). Tìm ba chữ số

[hachinguyen_99]

Nhập số nguyên dương m ( 100 < m < Maxlnt = 32767 ). Tìm ba chữ số cuối của m!
em cũng mới làm quen với pascal nên cũng trình còm, không biết cách tính giai thừa với các số lớn(nữa là tìm ba chữ số cuối), mong các bác chỉ giáo giùm!!!

[hcvtpt]

Bạn để ý thấy phép nhân là tổng các phép cộng, thay vì tìm thích bạn nên phân tích số và tìm tổng

[ksc10]

Bạn để ý thấy phép nhân là tổng các phép cộng, thay vì tìm thích bạn nên phân tích số và tìm tổng

m! khủng lắm đấy.
Chữ số cuối thì nhân mod là ra mà.