Не помешало бы добавить в самое начало program <имя программы> и uses crt.