Pascal ABC. 1.Дан текст.Создать множество букв не входящих в этот текст.
2.Дан текст.Создать множество букв входящих в текст и напечатать их по мере появления в тексте.
3.Дан текст.Создать множество букв входящих в текст более 1 раза.
4.Дан текст.Создать множество букв входящих в текст ровно 2 раза.
Желательно с объяснениями.
56
Объяснение:
X mod 3 - последняя цифра в троичной записи числа X. X div 3 - число, полученное отбрасыванием последней цифры в троичной системе счисления.
Используя написанное выше, легко понять, что делает программа.
Сначала M = L = 0, затем в цикле, пока X > 0, к M прибавляется 1, к L прибавляется 1, если последняя цифра в троичной записи числа равна 2. Потом последняя троичная цифра отбрасывается. В конце выводится M и L.
Программа выводит количество троичных цифр в записи числа X и количество двоек в троичной записи числа X.
Итак, нужно найти количество чисел, троичная запись которых состоит из 5 цифр, из которых ровно две двойки.
Если первая цифра не двойка, то она 1 (0 быть не может): 1. Для двоек можно выбрать место на каждое из мест, обозначенных вопросом, можно поставить любую из 2 цифр (0 или 1). Получается 6 * 2 * 2 = 24 числа.
Если первая цифра двойка, то место для второй двойки можно выбрать каждый вопрос можно заполнить одной из двух цифр, итого 4 * 2 * 2 * 2 = 32 числа.
Всего 24 + 32 = 56 вариантов.
& - Конъюнкция, истина только тогда, когда и А и Б истины, т.е 1
v - Дизъюнкция, истина, если хоть одна из переменных истина. Т.е ложно оно бывает только когда обе ложные (0)
И вот теперь тупо смотришь в таблицу.
B&C
Смотрим на первую строку. Они обе 0, т.е ложные, значит в столбце B&C в первой строке тоже 0. Дальше,вторая строка. Теперь B - 0, C - 1, тоже пишем 0, т.к истинно только одно. И т.д. В итоге истина только в 4 и 8 строке. Остальное нули.
Потом у тебя идёт A v (B&C). Смотришь на столбец А, и столбец, который ты только что заполнил. Аналогично. Т.е тут будет, что до 4 строки - ложь, а после и до конца - истина. т.к хоть одна истина будет.
Тоже самое и с другими.