Форум программистов, компьютерный форум, киберфорум
Prolog
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.68/34: Рейтинг темы: голосов - 34, средняя оценка - 4.68
0 / 0 / 0
Регистрация: 17.01.2012
Сообщений: 5

Определить предикат max, который находит максимум из двух чисел

17.05.2012, 11:48. Показов 7073. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Ребят...помогите пожалуйста, написать эту программу. Я ничего не могу понять Если можно, то с пояснением, если нет, то хотя бы что бы работала. Учитель лютует

Добавлено через 23 минуты
Пожалуйста, ребят....вроде не очень сложная программка, судя по неодобрительному взгляду преподавателя
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
17.05.2012, 11:48
Ответы с готовыми решениями:

Определить предикат maxelem(Tree, Max), чтобы Max равнялось наибольшему из чисел, входящих в дерево Tree
1# Определить предикат maxelem(Tree,Max) так , чтобы Max равнялось наибольшему из чисел, входящих в дерево Tree. 2# Запрограммируйте...

Предикат, который рекурсивно находит целую часть от деления одного числа на другое
Определить предикат div1(A,B,Rez), который рекурсивно находит целую часть от деления одного натурального числа на другое.

Создайте подпрограмму max(a,b,c), которая находит максимум из трех целых чисел
1. Создайте подпрограмму max(a,b,c), которая находит максимум из трех целых чисел. Подпрограмму реализуйте в двух вариантах – в виде...

5
119 / 119 / 25
Регистрация: 03.03.2010
Сообщений: 436
17.05.2012, 14:46
Nastia.,
Prolog
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
implement main
    open core,console %Открываем ядро и консоль
 
constants
    className = "main".
    classVersion = "".
 
clauses
    classInfo(className, classVersion).
 
clauses
run():-
   init(),
   setConsoleTitle("Определение максимального числа"),%Заголовок консоли
   write("Введите первое число: "), X = read(),  % ввод X
   write("Введите второе число: "), Y = read(),  % ввод Y
   Max = math::max(X,Y), % определение максимального числа
   setLocation(console_native::coord(25,10)),%столб,строка
   write("Максимальное число = ", Max), % вывод рез-та
   clearInput(),  % очистка буфера клавиатуры
   _=readchar().%Чтобы консоль сразу не закрывалась
 
end implement main
 
goal
    mainExe::run(main::run).
0
 Аватар для Грымзик
2507 / 1483 / 37
Регистрация: 14.09.2009
Сообщений: 2,740
17.05.2012, 23:24
Жалко вашего препода, кошмар с кем ему приходится работать.
0
119 / 119 / 25
Регистрация: 03.03.2010
Сообщений: 436
18.05.2012, 13:25
Грымзик, Пролог просто совсем другой стиль программирования. В умелых руках он конечно весьма мощный инструмент, но для того чтобы эти умелые руки "заиметь" надо весьма долго учить, причем с наставником.
0
 Аватар для Грымзик
2507 / 1483 / 37
Регистрация: 14.09.2009
Сообщений: 2,740
18.05.2012, 14:41
max(X,Y,X):-X>=Y.
max(X,Y,Y):-X<Y.

Для этого надо долго учиться с наставником?!!!!!!!!
0
119 / 119 / 25
Регистрация: 03.03.2010
Сообщений: 436
20.05.2012, 18:13
Грымзик, для этого конкретно нет. А для практического применения, в плане профессиональной деятельности да.
Кстати,думаю Вам знаком некий Винитарх с хардфорума, он мой преподаватель
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
20.05.2012, 18:13
Помогаю со студенческими работами здесь

Как по-другому написать код, который находит max из 4 чисел?
как по другом реализовать программу которая находить максимальное число из 4 Scanner sc = new Scanner(System.in); int...

определить максимум и минимум из 4х чисел. найти разность max-min
определить максимум и минимум из 4х чисел. найти разность max-min как сделать задачу???? Сделайте кто-нибудь

Определить максимум и минимум из 4х чисел.найти рахность max-min
Определить максимум и минимум из 4х чисел.найти рахность max-min Program xz; uses crt; var a:arrayof integer; ...

Найти максимум из девяти чисел(максимум из трех чисел(максимум из двух чисел)
Сделал кароч ток не знаю что в конце писать вот код: function maks_2(a,b:real):real; begin if a&gt;b then maks_2:=a else...

Алгоритм,который находит и выводит третий максимум массива
Нужно написать программу-алгоритм,который находит и выводит третий максимум массива.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
Фото: Daniel Greenwood
kumehtar 13.11.2025
Расскажи мне о Мире, бродяга
kumehtar 12.11.2025
— Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru