Определите истинное значение следующих сложных высказываний. пусть a –истинное высказывание, b – ложное высказывание. 1) f=(a \/ b) => ¬a 2) f=(a /\ b) => b 3) f=a => (a /\ b) 4) f=¬(a => (a \/ b)) 5 )f= ¬a => (b => a) 6) f=(a => b) /\ (b => a) 7) f= \/ b) => ¬a) /\ ((a /\ b) => b))

135

233

Посмотреть ответы 2

Ответы на вопрос:

ainashka1919

Информатика

4,8(76 оценок)

A=1, b=01) f=(a \/ b) => ¬a = ¬( 1+0) +¬1=0∨0=0 2) f=(a /\ b) => b =¬(a /\ b) ∨b=¬(1*0)∨ 0 =1 3) f=a => (a /\ b)=¬1∨(1∧0)=0∨0=0 4) f=¬(a => (a \/ b))=¬(¬1∨(1∨0))=0 5 )f= ¬a => (b => a)=¬( ¬a)∨(¬в∨а))=1∨1=1 6) f=(a => b) /\ (b => a)=(¬1∨0)∧(¬0∨1)=0 7) f= \/ b) => ¬a) /\ ((a /\ b) => b))=(¬1∨¬1)∧(¬(1∧0)∨0)=0

salamov1213

Информатика

4,4(58 оценок)

1) var n,i: integer; begin write('n = '); readln(n); for i: = 1 to 9 do writeln(i,'*',n,' = ',i*n); end. 2) var a,b: integer; begin writeln('введите натуральное число'); readln(a); b: =a mod 10; while (a div 10 > 0) do a: =a div 10; if a> b then writeln('первая больше') else if a< b then writeln('последняя больше') else writeln('цифры равны') end.