Viết chương trình phần tích một số nguyên n thành tích của các thừa số nguyên tố

Viết chương trình phần tích một số nguyên n thành tích của các thừa số nguyên tố.(PASCAL)