Крестики 19х19, о ХО Опции

[cooler]

Извините за повтор.
Нужна прога крестики-нолики 19х19
Смотрел в теме Хрестики-нолики,
там нет нормальных прог (в одной не могу подключить Unit)
Помогите плз.

[cooler]

Дубль два.

1) Сохраняю .pas
2)Жму ctrl+F9 (alt+F9)

Вылетает

Error 116: Must be in 8087 mode to compile this

Код

procedure inputsingle(var a:single);
    var rk : integer;
  begin {$I-}
    repeat
      readln(a);                     < ---------------- here
      rk:=IoResult;
      if rk<>0 then writeln('YOU ARE WRONG! REPEAT, PLEASE.');
    until rk=0
  end;

Отсюда вопрос : что же не так?!???!!!!???


На всякий случай: название модуля совпадает с названием файла (без раширения).

Сообщение отредактировано: cooler - 16.05.2007 22:44