| ²é¿´: 566 | »Ø¸´: 5 | |||
| µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû | |||
tpp001½ð³æ (ÖøÃûдÊÖ)
|
[½»Á÷]
¡¾ÇóÖú¡¿ÎҵijÌÐòÖÐÓÐÒ»¸ö¸ºµÄʵÊýÊä³öʱ£¬ÀÏÊÇÏÔʾ******¡¾ÒÑÍê½á¡¿ ÒÑÓÐ2È˲ÎÓë
|
||
|
ÎҵijÌÐò¾ÍÊÇ´ÓSTATISÎļþÖжÁÈëһЩÊý¾Ý£¬È»ºóÊä³öÆäÖÐһЩÏà¹ØµÄÊý¾Ý£¬¿ÉÊÇÓÐÒ»¸ö¸ºµÄʵÊýÊä³öʱÀÏÊÇÏÔʾ*******£¬Çë´ó¼Ò°ï棬лл PROGRAM MAIN IMPLICIT NONE DOUBLE PRECISION STEP(80000), TIM(80000), ENERGY(5), INTEGER, PARAMETER:: nstep=80000 INTEGER I, DUM !=================================================== OPEN (UNIT=21, FILE='energy') OPEN (UNIT=11, FILE='STATIS') DO I = 1, nstep READ (11, *) STEP(I), TIM(I), DUM READ (11, *) ENERGY(1), ENERGY(2), ENERGY(3), ENERGY(4), ENERGY(5) WRITE (21, "(3F12.6)" TIM(I), ENERGY(1), ENERGY(2)END DO CLOSE (11) CLOSE (21) STOP END [ Last edited by ÓàÔó³É on 2010-12-13 at 22:03 ] |
» ²ÂÄãϲ»¶
»¯¹¤Ñ§Ë¶294·Ö£¬Çóµ¼Ê¦ÊÕÁô
ÒѾÓÐ29È˻ظ´
Çóµ÷¼Á
ÒѾÓÐ10È˻ظ´
¿¼ÑÐÇóµ÷¼Á
ÒѾÓÐ13È˻ظ´
Çóµ÷¼Á
ÒѾÓÐ3È˻ظ´
È˹¤ÖÇÄÜ320µ÷¼Á08¹¤À໹Óлú»áÂð
ÒѾÓÐ17È˻ظ´
¿¼ÑÐÓ¢Ò»ÊýÒ»338·Ö
ÒѾÓÐ10È˻ظ´
ÇóÖúµ÷¼Á£¬¿çµ÷
ÒѾÓÐ15È˻ظ´
085600²ÄÁÏÓ뻯¹¤329·ÖÇóµ÷¼Á
ÒѾÓÐ20È˻ظ´
085600²ÄÁÏÓ뻯¹¤349·ÖÇóµ÷¼Á
ÒѾÓÐ15È˻ظ´
Çóµ÷¼Á
ÒѾÓÐ13È˻ظ´

tpp001
½ð³æ (ÖøÃûдÊÖ)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 749.3
- É¢½ð: 5
- ºì»¨: 1
- Ìû×Ó: 1040
- ÔÚÏß: 155.9Сʱ
- ³æºÅ: 423029
- ×¢²á: 2007-07-21
- ÐÔ±ð: GG
- רҵ: »¯Ñ§

3Â¥2010-12-13 11:33:16
tpp001
½ð³æ (ÖøÃûдÊÖ)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 749.3
- É¢½ð: 5
- ºì»¨: 1
- Ìû×Ó: 1040
- ÔÚÏß: 155.9Сʱ
- ³æºÅ: 423029
- ×¢²á: 2007-07-21
- ÐÔ±ð: GG
- רҵ: »¯Ñ§

2Â¥2010-12-13 11:32:17
tpp001
½ð³æ (ÖøÃûдÊÖ)
- Ó¦Öú: 0 (Ó×¶ùÔ°)
- ½ð±Ò: 749.3
- É¢½ð: 5
- ºì»¨: 1
- Ìû×Ó: 1040
- ÔÚÏß: 155.9Сʱ
- ³æºÅ: 423029
- ×¢²á: 2007-07-21
- ÐÔ±ð: GG
- רҵ: »¯Ñ§

4Â¥2010-12-13 11:35:13
¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
ÓàÔó³É(½ð±Ò+1):лл²ÎÓëÓ¦Öú£¬»¶Ó³£À´³ÌÐòÓïÑ԰棡 2010-12-13 22:03:17
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
ÓàÔó³É(½ð±Ò+1):лл²ÎÓëÓ¦Öú£¬»¶Ó³£À´³ÌÐòÓïÑ԰棡 2010-12-13 22:03:17
|
Êä³ö¸ñʽ²»ÄÜÂú×ãʵ¼ÊÊý¾Ý¡£'3F12.6¡® Ö»ÔÊÐí5λÕûÊý£¬¶øÊµ¼ÊÊý¾Ý -1.065357E +05 ÐèÒª6λÕûÊý ¡£ ÊÔ¼Ó´óÊä³öλÊý£º WRITE (21, "(3F18.6)" TIM(I), ENERGY(1), ENERGY(2) |

5Â¥2010-12-13 12:27:11














TIM(I), ENERGY(1), ENERGY(2)
»Ø¸´´ËÂ¥