filefor.pas

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

{$+}
program test(input,output);
var
	a,i: integer;
begin   
	a:=10;  
	
 	for i:=2 to 11 do
 	begin
 	        a := i;
 		write(a);
 	end;
 	
   
end.