wrongfile.pas

用.NET编的scanner

program EXAM;
/* sub function 
var A,X,Y:integer;
begin
    X:=A+3;
    Y:=X*4.45.944;
    B:=123abc;
    A:=12345678900;
    write('X=,X;'Y=',Y);
@#$%
end