ufof5的博客

非常方便的截图工具！可以做到几乎任何要求的截图，绿色版安全实用！无敌了！

PROGRAM TON DIMENSION X(2),Y(2),GX(2) IOBF=1 IDER=1 X(1)=-1.2 X(2)=1.5 CALL VARMT1(X,Y,FY,GX,2,5000,ICOVG,0.000001,1) WRITE(6,1)Y,FY,ICOVG 1 FORMAT(5X,3E21.10,2X,I5//) STOP END