[em18][em18][em18][em18][em18]
如何在pascal中外部编译文件，有这样的过程吗？
eg：
program eg;
var
i,j:string;
t:text;
begin
 i:='D:\eg2.txt';
 j:='D:\eg.3.txt';
 assign(t,'D:\eg.pas');
 rewrite(t);
 writeln(t,'program eg2;');
 writeln(t,'var a,b,c:integer;');
 writeln(t,'begin');
 writeln(t,'assign(input,i);');
 writeln(t,'rewrite(input);');
 writeln(t,'a:=1;b:=2;');
 writeln(t,'c:=a+b;');
 writeln(t,'assign(output,j);');
 writeln(t,'rewrite(output);');
 writeln(t,'write(output,c);');
 writeln(t,'close(input); close(output);');
 writeln(t,'end.');
 close(t);
end.

这个程序就使pascal在d盘新建一个名为‘eg。pas’的文件，并在里面输入一段代码（可编译），若要pascal运行这个程序怎么办？

  加30分！