Please Write A Pascal Program For Us $$?

I haven't programmed in Pascal in years, but even if I could, I hardly think your teacher is looking for someone else's work. You really need to meet with your teacher to see if you can get some help working on the project. If you ask the right questions, most teachers would practically do the work for you.