Какое задание? пару ответов есть
Var s,s1,t1,t2:string;i,n,m:integer;
beginread(s);n:=length(s);for i:=n downto 1 do s1:= s1 + s[i];m:=n div 2;writeln(n, m :4);t1:= copy(s,1,m);t2:= copy(s1,1,m);if t1 = t2 then writeln ('Введенный текст перевертыш')else writeln (' Не перевертыш введенный текст');end.<span />
Выделяешь поля, из которых нужно вычислить средний бал, жмякаешь на выделенную синим цветом кнопочку и выбираешь СРЗНАЧ, жмякаешь ОК)
Во - первых рассмотрим простые высказывания:
М - Монитор неисправен
В - Видеокарта неисправна
О - Оперативная память неисправна
Во вторых: Запишем на языке алгебры логики возможные предположения: (M v B) --> O и M --> B
<span><span>Пусть </span><span>F</span><span>(М,В,О) = </span>(M v B) --> O и M --> B</span>
составляем таблицу истинности:
М В О M --> B
<span>0 0 0 1 </span>
<span>1 0 1 1</span>
<span> 0 0 0 1</span>
<span> 1 1 1 0 </span>
<span>0 0 0 1</span>
<span> 0 1 1 0</span>
<span> 1 1 0 0</span>
<span> 1 1 1 1</span>
<span> 1 0 0 0 </span>
<span>1 0 0 0</span>
<span> 0 1 1 1</span>
<span> 1 1 0 1</span>
<span> 0 1 1 0 </span>
<span>1 1 1 1</span>
<span>0 0 1 0 </span>
<span>1 1 0 1</span>
<span> 1 1 0 1</span>
<span> 1 0 1 1 </span>
Анализ таблицы показывает, что сложное высказывание истинно во всех случаях, когда М – истинно, т.е. вероятнее всего неисправен именно монитор.