При составлении таблицы истинности используются следующие формулы:
Инверсия: =ЕСЛИ(A2=1;0;1);Дизъюнкция: =ЕСЛИ(ИЛИ(A2=1;B2=1);1;0);Конъюнкция: =ЕСЛИ(И(A2=1;B2=1);1;0);Импликация: =ЕСЛИ(И(A2=1;B2=0);0;1);Эквивалентность: =ЕСЛИ(A2=B2;1;0).
<em>Система</em>
<em>Структурированная, наглядная</em>
<em>Поясняет, упорядочивает, помогает</em>
<em>Предоставляет удобство в поиске информации</em>
<em>Порядок</em>
P = [12; 22]; Q = [33; 43]
Импликация ->, которая стоит в скобках, работает так.
Если точка x ∈ P, то должно быть x ∈ Q. Но это не так.
Нет ни одной точки из промежутка Р, который ∈ Q.
Если же точка x ∉ P, то она может ∈ Q, а может ∉ Q.
Поэтому импликация ложна для точек из промежутка Р.
И истинна для всех остальных точек числовой прямой.
Конъюнкция /\, которая стоит за скобками, работает так.
Если оба утверждения истинны, то конъюнкция истинна.
Если хоть одно ложно, то конъюнкция ложна.
Если множество А совпадает с множеством Р = [12, 22],
то для любого х выражение будет ложно.
Потому что для x ∈ A = P = [12; 22] ложна импликация.
А для x ∉ A = P ложно второе утверждение.
В обоих случаях конъюнкция ложна.
Ответ: A = P = [12, 22]; |A| = 10
Var S:string;
i,r,k,t:integer;
Begin
r:=0;
k:=0;
t:=0;
Write('Введите строку: ');ReadLn(S);
For i:= 1 to Length(S) do
Case S[i] of
'r':r:=r+1;
'k':k:=k+1;
't':t:=t+1;
End;
WriteLn('r: ',r);
WriteLn('k: ',k);
WriteLn('t: ',t);
End.