Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.09.2012, 00:04   #1
Vestars
 
Регистрация: 03.09.2012
Сообщений: 5
Радость Исправьте код Visual Prolog 5.2

Вот писал код но ошибок море можете исправить код пожалуйста.
Если можно до воскресения.Просто Лабу сдавать писать писал но до конца не понял его еще.
Или что-то подсказать по этому поводу.
Код:
domains 
  s=symbol
  predicates
nondeterm name_is(s)
nondeterm i_have(s)
nondeterm years_old(s,s)
nondeterm person_works(s,s)
nondeterm person(s)
nondeterm evenings_we(s) 
 
 clauses
 
 name_is(Dima).
 i_have(S,D,F).
 years_old(X,Y).
 person_works(G).
 person(X).
evenings_we(A).
 Who=Dima.
 years_old(ivan_igorovich,45).
 years_old(olha_petrivna,43).
 person_works(manager).
 person_works(teacher).
 evenings_we(watch_TV).
 evenings_we(read).
 evenings_we(newspapers).
 evenings_we(listen_music).
 F=grendparents.
 S=father.
 D=mother.
 person(ivan_Igorovich).
 person(olga_Petrivna).
 goal
 
name_is(Who),
write("My name is",Who);
i_have(S,D,F)
write(" Our family is neither large not small, just a typical  family ",S,D,F,". We all live together in a three-room flat in one of the industrial districts of Kyiv."),
write("We are an average family.") ;
years_old(X,Y),
write("My father ",X, "is" ,Y, "years old.","He is a tall and well-built man with short black hair and grey eyes.");
person_works(G)
write("He works as a ",G ,"at a big plant. He likes his work and spends most of his time there.",
 "By character my father is a quiet man, while my mother is energetic and talkative.") ;
 years_old(X,Y),
 write("My mother’s name is", X, "is", Y, "years old.");
 person_works(G),
 write(" My Mummy is forty, she is a ",G," of music and plays the piano well.",  
 "My mother always has a lot of work to do about the house and at school. She is a born teacher." ,
 "She is a busy woman and we all help her.");
 i_have(F),
 write("My", F," are retired. They like gardening.",
 "They spend a lot of their time in the garden. They grow vegetables and fruits. ",
 "We enjoy having fresh vegetables and green on our dinner table. ");
 evenings_we(A).
 write("Our family is very united. We like to spend time together.In the evenings we " ,A," or just talk about the events of the day.",
 "Our parents don’t always agree with what we say, but they listen to our opinion.").
За ранее большое спасибо

Последний раз редактировалось Vestars; 07.09.2012 в 00:06. Причина: случайно кусок кода не докинул
Vestars вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Visual Prolog kikisa Помощь студентам 0 11.06.2012 17:36
Visual Prolog 7.3 ZvEr_HaCkEr Софт 5 04.09.2011 09:03
одномерный массив в Си ! Исправьте код! osichev Помощь студентам 3 04.06.2009 17:14