How do I close the DOS screen after I run a pascal program and I'm stuck in a loop?

Question

Lets say I've made a pascal program. Let's say that I haven't saved the program and I mistakenly created a loop. I ran the program and I'm stuck in a loop in the DOS run screen. How do I get out without Alt+F4? The program I am using is Turbo Pascal.

Answer 1

Ctrl+C should do the trick, sometimes Ctrl+Break

Answer 2

If its stuck in a tight loop, you can't. But if it is writing to the screen or checking the keyboard then CTRL+C will do the trick.