标题给程序自动加上行号的小程序

　　现在的程序大多采用结构化设计方法，一般不须写上行号，但在程序分析和说明时没有行号又不方便，这就需要给程序加上行号，下面的这个简单的BASIC语言程序可以帮助你自动实现这一过程。
　　DIM a$(999)
　　i=1
　　INPUT "input SOURCE filename:";source$
　　INPUT "input TARGET filename:";target$
　　OPEN source$ FOR INPUT AS #1
　　OPEN target$ FOR APPEND AS #2
　　DO WHILE NOT EOF(1)
　　LINE INPUT #1，a$(i)
　　b$=STR$(i)+SPACE$(2)+a$(i)
　　PRINT #2，b$
　　i=i+1
　　LOOP
　　CLOSE