Логички оператори во
програмскиот јазик Паскал се:
AND - Исказот е вистина доколку
и двата искази се вистинити,
if (A = 1) AND (B = 2) then writeln('Bingo!');
OR -
Исказот е вистина доколку еден од двата искази е вистинит,
if (A = 1) OR (B = 2) then writeln('Bingo!');
NOT - Ја
сменува вистината во лага и обратно,
if NOT ((A = 1) AND (B = 2)) then writeln('Ne e
BINGO!');
ПРИМЕР:
program AND_OR_NOT_PRIMER;
var a, b, c : integer;
begin
a := 5; b := 3; c := 99;
if (a = 5) or (b > 2) then writeln('A');
if (a < 5) and (b > 2) then writeln('B');
if (a = 5) and (b = 2) then writeln('C');
if (c <> 6) or (b > 10) then writeln('D') else writeln('E');
if (b = 3) and (c = 99) then writeln('F');
if (a = 1) or (b = 2) then writeln('G');
if not( (a < 5) and (b > 2)) then writeln('H')
end.
|