Show 例子 3

优质

小牛编辑

133浏览

2023-12-01

下表显示了Pascal支持的所有关系运算符。假设变量A保持10，变量B保持20，则 -

操作者	描述	例
=	检查两个操作数的值是否相等，如果是，则条件变为真。	（A = B）不是真的。
<>	检查两个操作数的值是否相等，如果值不相等，则条件变为真。	（A <> B）是真的。
>	检查左操作数的值是否大于右操作数的值，如果是，则条件变为真。	（A> B）不是真的。
<	检查左操作数的值是否小于右操作数的值，如果是，则条件变为真。	(A < B) 为真
>=	检查左操作数的值是否大于或等于右操作数的值，如果是，则条件变为真。	（A> = B）不是真的。
<=	检查左操作数的值是否小于或等于右操作数的值，如果是，则条件变为真。	（A <= B）是真的。

尝试以下示例以了解Pascal编程语言中可用的所有关系运算符 -

program showRelations;
var
a, b: integer;
begin
   a := 21;
   b := 10;
   if a = b then
      writeln('Line 1 - a is equal to b' )
   else
      writeln('Line 1 - a is not equal to b' );
   if  a < b then
      writeln('Line 2 - a is less than b' )
   else
      writeln('Line 2 - a is not less than b' );
   if  a > b then
      writeln('Line 3 - a is greater than b' )
   else
      writeln('Line 3 - a is greater than b' );
   (* Lets change value of a and b *)
   a := 5;
   b := 20;
   if  a <= b then
      writeln('Line 4 - a is either less than or equal to b' );
   if ( b >= a ) then
      writeln('Line 5 - b is either greater than  or equal to ' );
end.

编译并执行上述代码时，会产生以下结果:

Line 1 - a is not equal to b
Line 2 - a is not less than b
Line 3 - a is greater than b
Line 4 - a is either less than or equal to b
Line 5 - b is either greater than or equal to b