program p33_5;
var x,y,z:boolean;
BEGIN
writeln(' x y x or y');
x:=true; y:=true; z:=x or y;
writeln(' ',x,' ',y,' ',x or y);
x:=true; y:=false; z:=x or y;
writeln(' ',x,' ',y,' ',x or y);
x:=false; y:=true; z:=x or y;
writeln(' ',x,' ',y,' ',x or y);
x:=false; y:=false; z:=x or y;
writeln(' ',x,' ',y,' ',x or y);
readln;
END.

<< Назад