error.plx

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

//                 Author  :  Tuwei                                               //
//                 Copyright All Reserved                                         //
//                                                                                //
//                 Function:  错误检测能力. 多个错误准确报出                      //
////////////////////////////////////////////////////////////////////////////////////
program
  integer a;
  logical b;

  procedure dd;
  begin
     wrte 4;
  end;  


  b := fale;
  a := ;  
  write a*5

  if a>4 
   a := 4;
   write 5;   
   write 6;
  end;
   
   while b and true 
   write 5;
  end;

   repeat 
       a := 5;    write 5;
 end.