Viết chương trình trong pascal nhập vào 2 số nguyên dương M và N ( M khác 1?)

viết chương trình trong pascal nhập vào 2 số nguyên dương M và N ( M khác 1 ?) hãy tìm và hiển thị ra màn hình số nguyên không âm K sao cho N! chia hết chom M ^K nhưng không chia hết cho M^(K+1)