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

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

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 14.11.2014, 00:01   #1
Dante3495One
 
Регистрация: 11.11.2014
Сообщений: 5
Вопрос Задачка

В переменные M1, M2 и M3 вводится итог подбрасывания трех монет так,
что TRUE соответствует «орел», а FALSE — «решка». Надо составить пять
выражений таких, чтобы они выдавали TRUE для следующих случаев:
· у всех монет выпал «орел»;
· у всех монет выпала «решка»;
· все монеты упали одинаково;
· у первой – «решка», у прочих – «орел»;
· у первой – «орел», а две остальные упали одинаково.
Подсказка: логические данные можно сравнивать; сравнение обладает самым
низким приоритетом, и потому внутри выражений заключается в скобки,
например: M1 and (M2=M3).
Вот такая вот задача.Попытаюсь все же сам решить.Но надеюсь что будет потом с чем сравнить)
Dante3495One вне форума Ответить с цитированием
Старый 14.11.2014, 00:15   #2
type_Oleg
Старожил
 
Аватар для type_Oleg
 
Регистрация: 02.03.2008
Сообщений: 2,499
По умолчанию

Первые три:
M1 and M2 and M3
(not M1) and (not M2) and (not M3)
M1 = M2 = M3

Второе еще так можно
not(M1 or M2 or M3)
type_Oleg вне форума Ответить с цитированием
Старый 14.11.2014, 01:32   #3
Dante3495One
 
Регистрация: 11.11.2014
Сообщений: 5
По умолчанию

Отличный ответ)
У меня правда получилось вот такие решение не знаю правильно оно или нет?!(
if A and (B=C) or (A=B=C) or (not A=B=C) or A and (not B=C)
Dante3495One вне форума Ответить с цитированием
Старый 14.11.2014, 10:29   #4
type_Oleg
Старожил
 
Аватар для type_Oleg
 
Регистрация: 02.03.2008
Сообщений: 2,499
По умолчанию

Пардон, я неправильно написал про третью задачу.
Надо так
(M1 = M2)and(M1 = M3)
type_Oleg вне форума Ответить с цитированием
Старый 14.11.2014, 10:43   #5
min@y™
Цифровой кот
Старожил
 
Аватар для min@y™
 
Регистрация: 29.08.2014
Сообщений: 7,629
По умолчанию

· у первой – «решка», у прочих – «орел»;
(not M1) and M2 and M3
· у первой – «орел», а две остальные упали одинаково.
M1 and not (M2 xor M3)
M1 and (M2 = M3)

децкий сад...
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
min@y™ вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задачка на C++ Biker Помощь студентам 6 09.03.2009 20:51
Задачка Claster Помощь студентам 2 24.09.2008 17:53
Задачка SunKnight Паскаль, Turbo Pascal, PascalABC.NET 3 03.09.2008 20:44