Паскаль, помогите ламеру)

[Tariel]

Заранее спасибо за любую подсказку, ситуация у меня такая.

Задали в универе наваять калькулятор в паскале. Все в общем проще некуда, вот только один касяк не могу исправить, кучу литературы уже перерыл, не помогло(

в куске программы типа:

writeln ('введите первое число');
readln (x1);

возникает вопрос, как ограничить пользователя во вводе данных с клавиатуры. Дело в том что переменная "x1"  имеет тип "real" и если пользователь введет буквы вместо цифр, происходит фигня. Как отключить ввод букв?

[Алексей++]

Tariel, вводи по одному символу и фильтруй, либо вводи в текстовую переменную и ругайся, если там не только цифры и точка, а потом повторяй ввод

[Sla]

для этих целей используются другие функции:
readkey и keypressed