24СʱÈÈÃŰæ¿éÅÅÐаñ    

Znn3bq.jpeg
²é¿´: 182  |  »Ø¸´: 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µÄ»ØÌû

skyang

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

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

¾ßÌåÊÇʲôʱºòÖ´ÐÐÄĸöÓï¾äÄØ£¿
̤̤ʵʵ×öÊ£¡
5Â¥2008-06-23 09:07:33
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢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µÄ»ØÌû

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µÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] ¿¼ÑÐÇóµ÷¼Á +3 ×ÓľÄÅ 2026-04-12 3/150 2026-04-12 20:06 by sakura6524
[¿¼ÑÐ] ʳƷÓëÓªÑø£¨0955£©271Çóµ÷¼Á +6 Éý¸ñ°¢´ï 2026-04-12 6/300 2026-04-12 17:45 by cyh¡ª315
[¿¼ÑÐ] 085600²ÄÁÏÓ뻯¹¤£¬Çóµ÷¼Á +12 won_qii 2026-04-07 12/600 2026-04-12 17:02 by lhj2009
[¿¼ÑÐ] 335Çóµ÷¼Á +13 ÏëÉϰ¶Ñ½£¡£¡ 2026-04-12 13/650 2026-04-12 11:37 by ²ñС°×
[¿¼ÑÐ] Ò»Ö¾Ô¸Î÷±±¹¤Òµ´óѧ289 085602 +33 yangæÃ 2026-04-10 34/1700 2026-04-12 08:11 by Art1977
[¿¼ÑÐ] 280Çóµ÷¼Á +7 ÙâÙâÒ¹Ò¹ 2026-04-09 10/500 2026-04-12 00:33 by À¶ÔÆË¼Óê
[¿¼ÑÐ] ²ÄÁϹ¤³ÌÈÕÓÉúÇóµ÷¼Á +7 0856?µ÷¼Á 2026-04-10 7/350 2026-04-11 21:33 by À¶ÔÆË¼Óê
[¿¼ÑÐ] 270Çóµ÷¼Á +14 ÑîÀÖ369 2026-04-11 14/700 2026-04-11 20:16 by À¶ÔÆË¼Óê
[¿¼ÑÐ] 085501»úеר˶ 302·Ö ²»ÌôרҵÇóµ÷¼Á +7 Íôij. 2026-04-09 7/350 2026-04-11 14:37 by luhong1990
[¿¼ÑÐ] 274Çóµ÷¼ÁÇóµ÷¼Á +11 Jachenbingoo 2026-04-06 14/700 2026-04-11 11:37 by ×ÏêØ×ÏÆå
[¿¼ÑÐ] 288Çóµ÷¼Á +15 ´úfish 2026-04-09 16/800 2026-04-11 10:26 by wwj2530616
[¿¼ÑÐ] 263ÄÜÔ´¶¯Á¦×¨Ë¶Çóµ÷¼Á +3 ¼Ó´óºÅ·¹ºÐ´ü 2026-04-10 3/150 2026-04-10 22:23 by 286640313
[¿¼ÑÐ] Çóµ÷¼Á288 +6 ioodiiij 2026-04-10 8/400 2026-04-10 21:07 by zhouxiaoyu
[¿¼ÑÐ] ÉúÎïѧ308·ÖÇóµ÷¼Á£¨Ò»Ö¾Ô¸»ª¶«Ê¦´ó£©×ö¹ý·Ö×ÓʵÑé +8 ÏàÐűػá¹ââÍòÕ 2026-04-07 9/450 2026-04-10 21:03 by zhouxiaoyu
[¿¼ÑÐ] Ò»Ö¾Ô¸211£¬»¯Ñ§Ñ§Ë¶£¬310·Ö£¬±¾¿ÆÖصãË«·Ç£¬Çóµ÷¼Á +27 ŬÁ¦·Ü¶·112 2026-04-07 30/1500 2026-04-10 15:06 by Kilig0317
[¿¼ÑÐ] »¯¹¤Ñ§Ë¶ 285Çóµ÷¼Á +26 Wisjxn 2026-04-07 26/1300 2026-04-08 14:42 by screening
[¿¼ÑÐ] 307Çóµ÷¼Á +3 Youth@@ 2026-04-07 3/150 2026-04-07 22:00 by hemengdong
[¿¼ÑÐ] 22408 һ־Ը˫һÁ÷È˹¤ÖÇÄÜ300·Ö ËÄÁù¼¶£¬Êý¾Ý·ÖÎö¹ú½± +4 zzfeng123 2026-04-06 6/300 2026-04-07 21:02 by zzfeng123
[¿¼ÑÐ] Ò»Ö¾Ô¸Î÷µç085401Çóµ÷¼Á +4 sunw1306 2026-04-07 4/200 2026-04-07 16:40 by à£à£à£0119
[¿¼ÑÐ] 328Çóµ÷¼Á +4 ghhh88888 2026-04-06 5/250 2026-04-07 14:45 by ghhh88888
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û