PascalABC.NET

A forum special on Pascal look ? Really need help.
25 years ago on the basic's still on the ZX-Spectrum without problems the program were applied and the game, and now decided to remember his youth to help the daughter-the schoolgirl in the development РascalABC. But there are some misunderstanding, which in the Basic's and there was no trace.
Here, for example. Can someone explain why don't want to work properly this simple program ?
If you enter a string in a loop for some reason always skipped the first step and immediately starts the second ?