filetype1.pas

来自「本Delphi项目文件为本人在一个Pascal-s（子集）源代码基础上完成的。本」· PAS 代码 · 共 14 行

{$+}
program test(input,output);
type
	type1=integer;
var
	a : type1;
begin   

 	a  :=2*50;
        write('a=');
        writeln(a);        
 	
   
end.