Поиск:

Ответ в темуСоздание новой темы Создание опроса
> проблема с открытием файла 
:(
    Опции темы
MetalKrot
Дата 30.11.2010, 06:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
одним словом нужно открыть файл и ДОПИСАТЬ его. вот что у меня получилось, почему-то ругается и выдает ошибку 103...

Код

domains
     list = symbol*
     file = rezult
     
predicates

nondeterm find
nondeterm member(symbol,list,real)
nondeterm ocenka(list,list,real,real)
nondeterm count(list)

database - my
    index(integer)
    number(integer)
    
database - myfile
    doc(string,list)
    search_file(list)

clauses

  find:-
    doc(N,SP),
    search_file(Search),
    retractall(index(_),my),
    assert(index(0),my),
    count(SP),
    index(Ind),
    ocenka(SP,Search,Rez1,0),
    Proc=Rez1/Ind,
    openappend(rezult,"D:\\Prolog\\rezult.txt"),
    write(Proc),
    closefile(rezult),
    fail.


ругается на строку file = rezult. что делать ума не приложу...
PM MAIL   Вверх
dorogoyIV
Дата 30.11.2010, 09:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1503
Регистрация: 26.3.2007

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

domains
     File = result
predicates

nondeterm test
clauses
  test:- openappend(result,"C:\\temp\\1\\1.txt"),
    writedevice(result),
    write("this is the new line in the file\n"),
    closefile(result).
goal
    test. 
PM MAIL   Вверх
MetalKrot
  Дата 1.12.2010, 03:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
спасибо за совет, но не помогло... точно та же ошибка. я даже пробовал писать "global domains".

ошибка: 103 This domain was declared previously file
PM MAIL   Вверх
viacheslav
Дата 8.5.2012, 23:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Нужно объявить файлы в "global domains", т.е.
Код

global domains 
       file = myfile
domains
       st = string
predicates
................


так работает smile

Это сообщение отредактировал(а) viacheslav - 8.5.2012, 23:09
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума Prolog
Void
  • Пожалуйста, создавайте темы с содержательными названиями.
  • Уважаемые учащиеся, здесь всегда рады помочь Вам, но не делать за Вас вашу работу. У вас гораздо больше шансов получить помощь, если Вы приложите усилия и поделитесь с нами проблемами и результатами. В противном случае добро пожаловать в раздел Центр Помощи.
  • Получив ответ на интересующий Вас вопрос, не забудьте пометить его как решённый.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Void.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Prolog | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0429 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.