I'll admit I haven't done pascal in a long long time, but this sounds like the common "enter stayed in the buffer" problem. Have you tried a string reading function instead of reading a single ...