Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/8: Рейтинг темы: голосов - 8, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 03.06.2016
Сообщений: 26

Аковы приметы правонарушителя?Написать программу.

25.12.2016, 22:23. Показов 1814. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Решите такую задачу. Показания свидетелей правонарушения значительно
различались. Первый свидетель сказал, что преступник был брюнет с усами.
Второй заявил, что это был блондин без усов. Третий свидетель подтвердил, что
преступник был блондином, но без портфеля. Четвертый был уверен, что
преступник был шатеном с портфелем.
В действительности оказалось, что каждый из свидетелей ошибся в одном из
своих показаний. Каковы приметы правонарушителя?Написать программу.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
25.12.2016, 22:23
Ответы с готовыми решениями:

Приметы
Что вы о них думаете, верите ли??? Пишем кто какие знает!!!! Типа таких: если жена смеётся над шутками мужа -- значит в доме гости :) Можно...

Студенческие приметы
Для того, чтобы успешно сдать экзамен существует ряд проверенных способов. Одним из самых надежных является: идя на экзамен, следует в...

Почему сбываются приметы и предсказания?
Разговаривая с поклонниками гороскопов, гаданий, примет, вещих снов и экстрасенсов, постоянно слышишь одно и то же: «Вот вы знаете, я тоже...

1
15155 / 6428 / 1731
Регистрация: 24.09.2011
Сообщений: 9,999
26.12.2016, 02:09
Visual Basic
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
Enum cvet
  Brun = 0
  Shat = 1
  Blon = 2
End Enum
 
Sub Form_Load()
Dim h As cvet, usi As Integer, port As Integer
AutoRedraw = True
For h = Brun To Blon
  For usi = True To False
    For port = True To False
      If h = Brun Xor usi Then           '1 св
        If h = Blon Xor Not usi Then     '2 св
          If h = Blon Xor Not port Then  '3 св
            If h = Shat Xor port Then    '4 св
Print Split("брюнет шатен блондин")(h), IIf(usi, "с усами", "без усов"), IIf(port, "с портфелем", "без портфеля")
            End If
          End If
        End If
      End If
    Next
  Next
Next
End Sub
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
26.12.2016, 02:09
Помогаю со студенческими работами здесь

Логическая задача "Приметы"
Помогите найти ошибку. Вот задача: Валя, Галя, Маша и Саша успешно сдали свои экзамены по выбору. Для большей уверенности в отличном...

Написать класс по строительству домов. Написать программу, демонстрирующую работу с классом.
Собственно, в С++ немного насасываю, код читать умею, а прогать - нет. К сожалению, обстоятельства сложились так, что я поступил именно...

Написать программу для рисования данного орнамента, написать комментарии к каждому действию программы

Нужно написать написать программу, которая вычисляет значение выражения в обратной польской записи
Обра́тная по́льская запись (англ. Reverse Polish notation, RPN) — форма записи математических и логических выражений, в которой операнды...

Вычислить U=max. (z,min (y,x))
вот условия: даны числа x,y,z. Вычислить U=max. (z,min (y,x)). Помогите, пожалуйста, решить ((((


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20%
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru