Ответы на вопрос:
Может так: var a,b,c: boolean; begin for a: =false to true do begin for b: =false to true do begin for c: =false to true do begin writeln ('1 zn'#9#9#9,'2 zn'#9#9#9,'a'#9,'b',#9,'c'#9); writeln('(a and b) and c'#9#9,'a and (b and c)'#9#9,'a=',a,' ','b=',b,' ','c=',c); if ((a and b) and c = a and (b and c)) then end; end; end; readln; end.
Популярно: Информатика
-
sandrokapanadze77711.10.2021 09:45
-
grrra121.10.2021 17:12
-
gymnazium00606.04.2022 01:48
-
ArianTop03.05.2023 10:15
-
соаовоых25.02.2023 16:01
-
ztv197819.04.2020 03:09
-
вова95327.08.2020 01:06
-
Khidjana9507.05.2023 01:46
-
Fizun07.08.2022 02:13
-
янаневолина28.11.2021 22:48