Originally posted by snoopyzhao at 2011-04-24 15:02:25:
ÎÒÊÇÖ¸ 5 Â¥µÄ£¬ºÜÃ÷ÏÔºÜÏÔµÄÓï·¨´íÎó¡­¡­

Originally posted by xk6891 at 2011-04-24 15:33:27:
ȷʵ£¬¸Õ²ÅµÄ±íÇéÒÔͼƬµÄÐÎʽ¸´ÖƹýÀ´£¬¾ÍÎÞ·¨×ª»¯Îª¡°)¡±ºóÒýºÅÁË£¬²»ºÃÒâ˼£¬ÉÏÃæ·¢µÄ¸üÕýÁË£¬±àÒëͨ¹ý

if(mod(i,2)/=0)then
write(23,"(A1,3(F15.9),1XA4,1XI1,7XA1,A1)")ele(i),pos2(i,j),"XXXX",1,ele(i),"+"
else
write(23,"(A1,3(F15.9),1XA4,1XI1,7XA1,A1)")ele(i),pos2(i,j),"XXXX",1,ele(i),"-"
end if

Originally posted by snoopyzhao at 2011-04-24 16:09:44:
ÎÊÌâ³öÔÚÕâÀ

[code]
if(mod(i,2)/=0)then
write(23,"(A1,3(F15.9),1XA4,1XI1,7XA1,A1)"ele(i),pos2(i,j),"XXXX",1,ele(i),"+"
else
write(23,"(A1,3(F15.9) ...

Originally posted by xk6891 at 2011-04-24 16:22:01:
¶÷Êǵģ¬È·ÊµÕâÀïÓÐÎÊÌâ,ÕâÑùÈçºÎ(pos(i,j),j=1,3)

Originally posted by snoopyzhao at 2011-04-24 16:44:59:
Ó¦¸Ã¿ÉÒÔ£¬¿ÉÒÔ²âÊÔһϣ¬ºÇºÇ¡­¡­