²é¿´: 175  |  »Ø¸´: 5
µ±Ç°Ö÷ÌâÒѾ­´æµµ¡£
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

skyang

Ìú¸Ëľ³æ (ÖøÃûдÊÖ)

[½»Á÷] ÓÐË­ÖªµÀ¹ÅÀϵÄFORTRANÓïÑÔ£¿Óм¸¸öÓï¾äÇë½Ì£¡¡¾ÓÐЧÆÚÖÁ2008Äê6ÔÂ23ÈÕ¡¿

1¡¢FORMAT(F9.2,4F9.4)Êä³ö¸ñʽӦ¸ÃÊÇʲô£¿
2¡¢  N=5
     WRITE(N,44)    X(1)
        ÆäÖеÄN´ú±íʲôÒâ˼£¿
3¡¢IF(ISO.GT.0) GOTO 12  ÆäÖеÄ.GT.ÊÇʲôÒâ˼À´×Å£¿
4¡¢IF(D-1.E-10) 42,42,45   Õâ¸öÓï¾äʲôÒâ˼°¡£¿ÆäÖеÄ42£¬45¶¼ÊÇÓï¾äÐкš£
·Ç³£¸Ðл£¡

[ Last edited by skyang on 2008-6-23 at 13:26 ]

» ²ÂÄãϲ»¶

̤̤ʵʵ×öÊ£¡
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

hxfciae

ľ³æ (СÓÐÃûÆø)

¡ï ¡ï
skyang(½ð±Ò+2,VIP+0):thanks
Õâ¶¼ÊÇFortran77ÖеÄÓï·¨¡£
1¡¢FORMAT(F9.2,4F9.4)Êä³ö¸ñʽÊÇÊä³ö9¸ö×Ö·û¿íÊä³ö¸¡µãÊý£¬ÆäÖÐСÊý²¿·ÖÕ¼3λ£¨Ð¡Êýµãռһ룩£»È»ºóÁ¬ÐøÊä³ö4¸ö¸¡µãÊý£¨9¸ö×Ö·û¿íµÄ¸¡µãÊý£¬Ð¡Êý²¿·ÖÕ¼5룩¡££¿
2¡¢  N=5
     WRITE(N,44)    X(1)
        ÆäÖеÄN´ú±íÊä³öλÖ㬶ÔÓÚÒ»°ã¼ÆËã»ú¶øÑÔN=5´ú±íÊä³öµ½ÆÁÄ»£»
3¡¢IF(ISO.GT.0) GOTO 12  ÆäÖеÄ.GT.´ú±ígreat than£¬´óÓÚ
4¡¢IF(D-1.E-10) 42,42,45   ´ú±íÅжÏÓï¾äµÄ²»Í¬È¡ÖµËù¶ÔÓ¦µÄÖ´ÐÐÓï¾ä¡£
4Â¥2008-06-23 08:40:37
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 6 ¸ö»Ø´ð

addila

ľ³æ (ÕýʽдÊÖ)

¡ï ¡ï
skyang(½ð±Ò+2,VIP+0):thanks
µÚÒ»¸öÊä³ö£º f9.2¸ñʽµÄÊý×Ö£¬ºÍ4¸öf9.4¸ñʽµÄÊý×Ö

2£¬n´ú±íµÚnÐеĸñʽ°É

3. ÄÇÊÇ´óÓÚºÅ

4. ÊDz»ÊÇÖ´ÐÐ42Á½´Î£¬45Ò»´Î£¿
2Â¥2008-06-23 08:18:53
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lianghust

Ìú¸Ëľ³æ (ÕýʽдÊÖ)

¡ï
skyang(½ð±Ò+1,VIP+0):thanks
1:F9.2 --ʹÓÃ9¸ö×Ö·û¿íÊä³ö¸¡µãÊý£¬ÆäÖÐСÊý²¿·ÖÕ¼3λ£»4F9.4ÖÐFÇ°ÃæµÄ4ÊÇÁ¬ÐøÊä³öËĸö¸¡µãÊý¡£
2£ºwrite£¨N,44£©£ºN±íʾÊä³öλÖá£
3£º.GT.: >

[ Last edited by lianghust on 2008-6-23 at 08:21 ]
3Â¥2008-06-23 08:20:04
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

skyang

Ìú¸Ëľ³æ (ÖøÃûдÊÖ)

4¡¢IF(D-1.E-10) 42,42,45   ´ú±íÅжÏÓï¾äµÄ²»Í¬È¡ÖµËù¶ÔÓ¦µÄÖ´ÐÐÓï¾ä¡£

¾ßÌåÊÇʲôʱºòÖ´ÐÐÄĸöÓï¾äÄØ£¿
̤̤ʵʵ×öÊ£¡
5Â¥2008-06-23 09:07:33
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 265Çóµ÷¼Á +9 ÁºÁºÐ£Ð£ 2026-03-17 9/450 2026-03-21 02:17 by JourneyLucky
[¿¼ÑÐ] 307Çóµ÷¼Á +10 ÀäóÏ123 2026-03-17 10/500 2026-03-21 01:54 by JourneyLucky
[¿¼ÑÐ] ²ÄÁÏ 336 Çóµ÷¼Á +3 An@. 2026-03-18 4/200 2026-03-21 01:39 by JourneyLucky
[¿¼ÑÐ] 299Çóµ÷¼Á +4 shxchem 2026-03-20 5/250 2026-03-21 00:24 by ÐÇ¿ÕÐÇÔÂ
[¿¼ÑÐ] 321Çóµ÷¼Á +9 ºÎÈó²É123 2026-03-18 11/550 2026-03-20 23:19 by JourneyLucky
[¿¼ÑÐ] 317Çóµ÷¼Á +5 Éê×ÓÉêÉê 2026-03-19 9/450 2026-03-20 22:26 by JourneyLucky
[¿¼ÑÐ] 329Çóµ÷¼Á +9 ÏëÉÏѧ߹߹ 2026-03-19 9/450 2026-03-20 22:01 by luoyongfeng
[¿¼ÑÐ] 0817 »¯Ñ§¹¤³Ì 299·ÖÇóµ÷¼Á ÓпÆÑо­Àú ÓжþÇøÎÄÕ +22 rare12345 2026-03-18 22/1100 2026-03-20 20:39 by zhukairuo
[¿¼ÑÐ] 0856µ÷¼Á£¬ÊÇѧУ¾ÍÈ¥ +8 sllhht 2026-03-19 9/450 2026-03-20 14:25 by ÎÞи¿É»÷111
[¿¼ÑÐ] Áº³ÉΰÀÏʦ¿ÎÌâ×é»¶Ó­ÄãµÄ¼ÓÈë +9 һѼѼӴ 2026-03-14 11/550 2026-03-19 17:22 by £¡±¾°µÒ»´Î£¡
[¿¼ÑÐ] ²ÄÁϹ¤³Ìר˶µ÷¼Á +5 204818@lcx 2026-03-17 6/300 2026-03-18 22:55 by 204818@lcx
[¿¼ÑÐ] 0854¿É¿çµ÷¼Á£¬Ò»×÷Ò»ÏîºËÐÄÂÛÎÄÎåÏîרÀû£¬Ê¡¡¢¹ú¼¶Ö¤Êé40+ÊýÒ»Ó¢Ò»287 +8 СÀî0854 2026-03-16 8/400 2026-03-18 14:35 by ²«»÷518
[¿¼ÑÐ] 0703»¯Ñ§µ÷¼Á +3 ÄÝÄÝninicgb 2026-03-17 3/150 2026-03-18 10:29 by macy2011
[¿¼ÑÐ] ÉúÎïѧ071000 329·ÖÇóµ÷¼Á +3 ÎÒ°®ÉúÎïÉúÎﰮΠ2026-03-17 3/150 2026-03-18 10:12 by macy2011
[¿¼²©] 26²©Ê¿ÉêÇë +3 1042136743 2026-03-17 3/150 2026-03-17 23:30 by ÇáËɲ»ÉÙËæ
[˶²©¼ÒÔ°] ºþ±±¹¤Òµ´óѧ ÉúÃü¿ÆÑ§Ó뽡¿µÑ§Ôº-¿ÎÌâ×éÕÐÊÕ2026¼¶Ê³Æ·/ÉúÎï·½Ïò˶ʿ +3 1ϲ´º8 2026-03-17 5/250 2026-03-17 17:18 by ber´¨cool×Ó
[¿¼ÑÐ] 326Çóµ÷¼Á +4 ŵ±´¶û»¯Ñ§½±êéê 2026-03-15 7/350 2026-03-16 17:11 by ŵ±´¶û»¯Ñ§½±êéê
[¿¼ÑÐ] 327Çóµ÷¼Á +6 ʰ¹âÈÎȾ 2026-03-15 11/550 2026-03-15 22:47 by ʰ¹âÈÎȾ
[¿¼ÑÐ] 26¿¼ÑÐÒ»Ö¾Ô¸ÖйúʯÓÍ´óѧ(»ª¶«)305·ÖÇóµ÷¼Á +3 ¼ÎÄêÐÂ³Ì 2026-03-15 3/150 2026-03-15 13:58 by ¹þ¹þ¹þ¹þºÙºÙºÙ
[¿¼ÑÐ] 085601²ÄÁϹ¤³Ì315·ÖÇóµ÷¼Á +3 yang_0104 2026-03-15 3/150 2026-03-15 10:58 by peike
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û