VPF::Задача набранна верно, но не запускается-((

Kaora

Дата 26.3.2011, 09:50 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 26.3.2011

Репутация: нет
Всего: нет

Никак не могу понять, почему программа, выводящая на экран тип ПК, не хочет запускаться.
Компилятор говорит, на ошибок нет, но программа не запускается.

код программы:

Код

BEGIN
  case Mem[$F000:$FFFE] of
    $FF: WriteLn('PC');
    $FE: WriteLn('XT');
    $FD: WriteLn('PCyr');
    $FC: WriteLn('AT');
  else
    writeLn('Нестандартный тип ПK',Mem[$F000:$FFFE])
  end
END.

P.S. код верный, набран из книги

Это сообщение отредактировал(а) volvo877 - 4.4.2011, 10:36

THandle

Дата 26.3.2011, 10:41 (ссылка)

(нет голосов)

Загрузка ...

Хранитель Клуба
Group Icon

Награды: 1

Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: нет
Всего: 372

Kaora, может она запускается и сразу закрывается?

Попробуй написать ReadLn; перед последним end.

Kaora

Дата 26.3.2011, 10:47 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 26.3.2011

Репутация: нет
Всего: нет

THandle, огромное вам спасибо!))
..я совсем забыла, что "readln" опускается в книгах...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Object Pascal: кроссплатформенные технологии \| Следующая тема »