Что нужно дописать в коде на паскале для того чтобы программа выдавала сразу все возможные варианты(их 8) 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 readln; end; end; end; end.
243
371
Ответы на вопрос:
Может так: 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.
Популярно: Информатика
-
alyonavasnecova3416.11.2021 13:10
-
alexander12413101.02.2023 01:12
-
TeoRe22.08.2022 07:42
-
пучкаек16.03.2021 02:18
-
liza128810.06.2023 16:23
-
linik225.10.2020 11:37
-
Катрин70304.03.2023 01:33
-
K1rysha29.03.2020 18:40
-
Викуська253124.10.2021 22:00
-
Julia2812200206.02.2023 19:16