IPB
ЛогинПароль:

> Внимание!

1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным.
В описании темы указываем язык!!!

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> Пролог
сообщение
Сообщение #1


Fanat
***

Группа: Пользователи
Сообщений: 261
Пол: Мужской
Реальное имя: Сергей

Репутация: -  5  +


Код

domains
list=integer*.
list2=char*.
FILE=infile.
predicates
vvod(symbol,list).
read(list).
clauses
vvod(N,L):-existfile(N),
openread(infile,N),
readdevice(infile),writedevice(screen),
read(L),closefile(infile),readdevice(stdin),!.
read(L):-readchar(X),write(X),//<---Вот тут.
          read(L1),L=[X|L1].          
read([]).


Вот код программы на прологе...если в выделенном месте заменить на readint то перестаёт читать из файла...
при vvod("файл.txt",L) хочеться получить в L список integer. Пробовал readreal,char_int тоже не работают...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Fanat
***

Группа: Пользователи
Сообщений: 261
Пол: Мужской
Реальное имя: Сергей

Репутация: -  5  +


Проблема решена. blum.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 30.09.2020 13:45
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name