var a:byte;
begin
randomize;
a:=random(11)+7;
writeln(a);
end.
ответы с готовыми решениями:
Сумма введенных чисел
При запуске программы были введены числа: 2.5 6.79 8.989 7.67 9.78 Запишите сумму чисел, которые...
Произведение всех введенных пользователем чисел, исключая нули
Надо написать программу, чтобы находить произведение всех введенных пользователем чисел, исключая...
Сумма логарифмов всех простых чисел от 2 до какого-нибудь числа
Напишите программу, которая вычисляет сумму логарифмов всех простых чисел от 2 до какого-нибудь...
Вывод в порядке возрастания всех трехзначных чисел, сумма цифр которых равна n
вот,что накидала: но программа выдает при выводе n n=int(input()) for i in range(100,1000): ...
Объяснение:
Нарисуем на диаграмме, при каких x выражение ((x ∈ A) → (x ∈ P)) ∧ ((x ∈ Q) → ¬(x ∈ A)) истинно. Выражение состоит из двух условий, соединенных логическим и, так что оно будет истинным в том и только в том случае, когда оба условия истинны.
(x ∈ A) → (x ∈ P) истинно всегда, кроме случая x ∈ A, x ∉ P. На рисунке область истинности выделена синей штриховкой.
(x ∈ Q) → ¬(x ∈ A) истинно всегда, кроме случая x ∈ Q, x ∈ A. На рисунке эта область выделена зелёной штриховкой.
Формула истинна, если x принадлежит областям, выделенным обеими штриховками одновременно. Если формула верна при всех x, то области, не выделенные какой-то из штриховок, не содержат элементов, так что всё множество A состоит из элементов, которые есть в P, но которых нет в Q (эта область на рисунке помечена звёздочкой). Подходящих элементов всего 7: P \ Q = {2, 4, 8, 10, 14, 16, 20}, – так что максимальное количество элементов в A равно семи.
ответ: 7.
begin
var a:=Random(7,17);
a.Println
end.