if.plx

来自「一个PLX教学编译器IDE」· PLX 代码 · 共 25 行

//                 Author  :  Tuwei                                               //
//                 Copyright All Reserved                                         //
//                                                                                //
//                 Function:  text 'if' sentence.                                 //
////////////////////////////////////////////////////////////////////////////////////

program
integer a,d;
logical b
begin
  a := 5;
  b := false;

  if a-2 >= 2 then    
   b := true;
   d := 100;
  end;
   
  if b then 
     write d;
  else
     write 5;
  end;
  
end.