Все лабораторные работы по паскалю / 1 лаб. Арифметические операции / prog15

program prog15;
uses crt;
var n,m,otv: byte;
begin
 clrscr;
 readln(n,m);
 otv:=n or m;
 writeln(otv);
 readln;
end.