Консультация № 200518
28.03.2021, 13:33
0.00 руб.
28.03.2021, 14:00
0 7 0
Здравствуйте, уважаемые эксперты! Прошу вас ответить на следующий вопрос:
Запишите в новый файл все строки исходного файла, содержащие в качестве фрагмента заданную строку, которая вводится с клавиатуры.
SWI-PROLOG

Обсуждение

давно
Старший Модератор
31795
6196
28.03.2021, 13:38
общий
28.03.2021, 13:41
Адресаты:
Цитата: gena.sorbuchev
SWI-PROLOG

Ну есть такой язык PROLOG. SWI-PROLOG - один из диалектов.

Вопрос в чем?
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

давно
Посетитель
403237
19
28.03.2021, 13:55
общий
28.03.2021, 14:34
Не вставился вопрос.
Задание:
Запишите в новый файл все строки исходного файла, содержащие в качестве фрагмента заданную строку, которая вводится с клавиатуры.

Не могу сообразить как мне в прологе сравнивать построчно из файла строки с фрагментом, который ввел с клавиатуры и совпадающие строки вывести в новый файл.
f:-
Код:
write('Введите имя исходного файла:'),
read(SOURFILE),
check_exist(SOURFILE),
open(SOURFILE,read,FROM),
read_line_to_string(FROM,X),writef(" "),
writef(X),
writeln(" "),
write('Введите подстроку:'),
read(WR),

close(FROM),
write('Введите имя нового файла:'),
read(NEWFILE),
check_exist(NEWFILE),
name(S,X),
write_to_file(NEWFILE,S).

check_exist(Filename):-exists_file(Filename),!.
check_exist(_):-writeln('Такого файла нет'),
fail.

write_to_file(Filename,TEXT) :-
open(Filename, write, File),
write(File, TEXT),nl,
writeln('Данные упешно записаны'),
close(File).


Буду рад, любому совету или направлению. В прологе плохо соображаю.
давно
Профессор
401888
1232
28.03.2021, 14:25
общий
Адресаты:
А при чем здесь раздел
Pascal, Delphi и Lazarus?
давно
Старший Модератор
31795
6196
28.03.2021, 14:42
общий
Адресаты:
Цитата: puporev
А при чем здесь раздел


Паскаль - универсален
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

давно
Посетитель
403237
19
28.03.2021, 14:47
общий
А на сайте в принципе нет раздела, который мне нужен. Думал модераторы могут поменять. Видимо нет. Можете закрыть вопрос, так как он не в том разделе.
давно
Старший Модератор
31795
6196
01.04.2021, 22:03
общий
Адресаты:
Цитата: gena.sorbuchev
Можете закрыть вопрос, так как он не в том разделе


В PROLOG.и/или SWI-PROLOG => даже строка представляет список, т.е. её можно разобрать по принцыпу голова:хвост, или голова:шея:хвост.

Сейчас, у меня нет ни PROLOG, SWI-PROLOG даже LISP.
Поэтому - сорри.
Об авторе:
Мне безразлично, что Вы думаете о обо мне, но я рад за Вас - Вы начали думать.

давно
Посетитель
403237
19
02.04.2021, 05:03
общий
Да закрывайте вопрос, я уже решил задачу.
Форма ответа