±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 1016  |  »Ø¸´: 9
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

astringent

Í­³æ (ÖøÃûдÊÖ)

[½»Á÷] ¡¾ÇóÖú¡¿ÕâÑùµ÷ÓÃ×Ó³ÌÐò¿ÉÒÔÂ𣿠ÒÑÓÐ8È˲ÎÓë

ÎÒÔÚÖ÷³ÌÐòµ÷ÓÃ×Ó³ÌÐòtest1£¨a1£©£¬È»ºóÔÙ×Ó³ÌÐòtest1Öе÷ÓÃ×Ó³ÌÐòtest2£¨a1£©£¬ÈçÏÂËùʾ£º
program main
-----
integer  a1
call test1(a1)
if(a1=1) then
---
end if
end

subroutine test1(a1)
integer a1
a1=0
call test2(a1)
if (a1=1) then
----
return
end test1

subroutine test2(a1)
integer a1
a1=0
if (Ìõ¼þ³ÉÁ¢) then
a1=1
endif
return
end
»Ø¸´´ËÂ¥

» ±¾ÌûÒÑ»ñµÃµÄºì»¨£¨×îÐÂ10¶ä£©

» ²ÂÄãϲ»¶

» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:

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

Jeydragon

ľ³æ (ÕýʽдÊÖ)

¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
ÓàÔó³É(½ð±Ò+1):»¶Ó­³£À´³ÌÐòÓïÑ԰棡 2010-12-20 20:19:32
ºÃ¶à»°¸Ð¾õ×Ô¼º¾­Àú¹ýÁ˲ŸоõÈÝÒ×£¬¸ßÊÖ¸Õ¿ªÊ¼Ôõô¹ýÀ´µÄ£¿
Óûº£³Á¸¡ÃûÀûÕù£¬Ê¯¹âµç»ð²½´ËÉú£»·ç³¾ÇéÊ»Ӳ»¾¡£¬¹ÛÊÀ²»Ð¦ÊdzÕÈË¡£
8Â¥2010-12-19 22:13:51
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 10 ¸ö»Ø´ð

coolrainbow

ľ³æ (ÖøÃûдÊÖ)

δÀ´¹ú¼Ò¶³Á¹

¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
nono2009(½ð±Ò+1):¹ÄÀøÓ¦Öú 2010-11-17 10:14:24
Ê×ÏȸæËßÄã´ð°¸£º¿ÉÒÔ

Æä´Î¸æËßÄ㣺ÄãÍêÈ«¿ÉÒÔ×Ô¼ºÊÔÊÔ¾ÍÖªµÀÁË£¬²»ÓÃÒ»·ÖÖÓµÄʱ¼ä£¬ºÎ±ØÒªÎÊÄØ£¬±à³ÌÓкܴ󲿷ֹ¤×÷ÊÇÒªÊԵġ£µ±³õÎÒÃDZàд¶àºË³ÌÐòºÍµ÷ÓÃBLASµÄʱºò£¬¸ù±¾Ã»ÓÐÎĵµ£¬ÍêÈ«ÊÇÒ»¸ö¸öÊÔ³öÀ´ÔõôÓõÄ
¼¼Êõ²©¿Í£ºhttp://hi.baidu.com/coolrainbow/blog
2Â¥2010-11-16 11:17:38
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

astringent

Í­³æ (ÖøÃûдÊÖ)

ÒýÓûØÌû:
Originally posted by coolrainbow at 2010-11-16 11:17:38:
Ê×ÏȸæËßÄã´ð°¸£º¿ÉÒÔ

Æä´Î¸æËßÄ㣺ÄãÍêÈ«¿ÉÒÔ×Ô¼ºÊÔÊÔ¾ÍÖªµÀÁË£¬²»ÓÃÒ»·ÖÖÓµÄʱ¼ä£¬ºÎ±ØÒªÎÊÄØ£¬±à³ÌÓкܴ󲿷ֹ¤×÷ÊÇÒªÊԵġ£µ±³õÎÒÃDZàд¶àºË³ÌÐòºÍµ÷ÓÃBLASµÄʱºò£¬¸ù±¾Ã»ÓÐÎĵµ£¬ÍêÈ«ÊÇÒ»¸ö¸öÊÔ³öÀ´ÔõôÓõÄ

ÎÒ¸Õѧfortran£¬´¦ÓÚÃÔã״̬£¬ËùÒÔ¾ÍÅÂÔÚ³ÌÐòÔËÐÐÍùµ÷ÓóÌÐò¶Ë·µÖµµÄʱºò³ö´í£¬±Ï¾¹ÊÇÔÚ¼ÆËã»úÄÚ²¿£¬ÈË¿´²»µ½¡£±¾È˵ÄÎÊÌâÓеã²Ë£¬Çë¶à°üº­
3Â¥2010-11-17 00:18:04
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

gd88

½ð³æ (СÓÐÃûÆø)

¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
nono2009(½ð±Ò+1):¹ÄÀøÓ¦Öú 2010-11-17 10:14:37
ÒýÓûØÌû:
Originally posted by astringent at 2010-11-17 00:18:04:

ÎÒ¸Õѧfortran£¬´¦ÓÚÃÔã״̬£¬ËùÒÔ¾ÍÅÂÔÚ³ÌÐòÔËÐÐÍùµ÷ÓóÌÐò¶Ë·µÖµµÄʱºò³ö´í£¬±Ï¾¹ÊÇÔÚ¼ÆËã»úÄÚ²¿£¬ÈË¿´²»µ½¡£±¾È˵ÄÎÊÌâÓеã²Ë£¬Çë¶à°üº­

¶î......
³ÌÐò²»Êǵ÷ÊÔ³öÀ´µÄÂ𣿸ù¾Ý´íÎóÌáʾ¸Ä¾ÍÐÐÁË¡£

Áí£¬Èç¹ûµ£ÐĵÄÊǾ«¶ÈÎÊÌ⣬ÄÇÒò¸ÃÈ¥×¢ÒâÊý¾ÝµÄÀàÐÍ¡£
4Â¥2010-11-17 01:50:36
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 295²ÄÁϹ¤³Ìר˶Çóµ÷¼Á +3 1428151015 2026-03-27 3/150 2026-03-27 19:49 by JourneyLucky
[¿¼ÑÐ] 085602 »¯¹¤×¨Ë¶ 338·Ö Çóµ÷¼Á +8 ·³ÕСç÷ 2026-03-27 8/400 2026-03-27 16:50 by lenovolsw
[¿¼ÑÐ] ²ÄÁÏ292µ÷¼Á +12 éÙËÌ˼ÃÀÈË 2026-03-23 12/600 2026-03-27 15:44 by caszguilin
[¿¼ÑÐ] 0703»¯Ñ§Çóµ÷¼Á£¬¸÷λÀÏʦ¿´¿´ÎÒ£¡£¡£¡ +4 Æîì÷ì÷ 2026-03-25 4/200 2026-03-27 13:55 by stillstella
[¿¼ÑÐ] 317Çóµ÷¼Á +5 Ê®ÏÐwx 2026-03-24 5/250 2026-03-27 13:48 by ÑîÑîÑî×Ï
[¿¼ÑÐ] 286Çóµ÷¼Á +4 lim0922 2026-03-26 4/200 2026-03-27 10:28 by guoweigw
[¿¼ÑÐ] ²ÄÁÏѧ˶£¬Çóµ÷¼Á 6+5 ÌǺù«888ll 2026-03-22 10/500 2026-03-27 08:18 by hypershenger
[¿¼ÑÐ] Çóµ÷¼Á Ò»Ö¾Ô¸ ±¾¿Æ ±±¿Æ´ó »¯Ñ§ 343 +6 13831862839 2026-03-24 7/350 2026-03-26 22:57 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] Ò»Ö¾Ô¸»ªÀí£¬ÊýÒ»Ó¢Ò»285ÇóAÇøµ÷¼Á +8 AZMK 2026-03-25 10/500 2026-03-26 22:37 by ѧԱ8dgXkO
[¿¼ÑÐ] 327Çóµ÷¼Á +7 prayer13 2026-03-23 7/350 2026-03-26 20:48 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] Ò»Ö¾Ô¸¹þ¹¤´ó£¬085400£¬320£¬Çóµ÷¼Á +4 gdlf9999 2026-03-24 4/200 2026-03-25 23:01 by boxking200
[¿¼ÑÐ] Çóµ÷¼Á +3 ÀîÀî²»·þÊä 2026-03-25 3/150 2026-03-25 13:03 by cmz0325
[¿¼ÑÐ] 292Çóµ÷¼Á +4 ¶ì¶ì¶ì¶î¶î¶î¶î¶ 2026-03-24 4/200 2026-03-24 16:41 by peike
[¿¼ÑÐ] 300Çóµ÷¼Á£¬²ÄÁÏ¿ÆÑ§Ó¢Ò»Êý¶þ +5 leaflight 2026-03-24 5/250 2026-03-24 16:25 by laoshidan
[¿¼ÑÐ] 307Çóµ÷¼Á +3 ÓàÒâÇä 2026-03-21 6/300 2026-03-24 15:03 by ÓàÒâÇä
[¿¼ÑÐ] Ò»Ö¾Ô¸070300Õã´ó»¯Ñ§358·Ö£¬Çóµ÷¼Á£¡ +4 ËÖËÖÓã.. 2026-03-21 4/200 2026-03-23 08:12 by Iveryant
[¿¼ÑÐ] Ò»Ö¾Ô¸±±¾©»¯¹¤´óѧ070300 ѧ˶336Çóµ÷¼Á +5 vvÃÔ 2026-03-21 8/400 2026-03-22 14:20 by ColorlessPI
[¿¼ÑÐ] 285Çóµ÷¼Á +6 ytter 2026-03-22 6/300 2026-03-22 12:09 by ÐÇ¿ÕÐÇÔÂ
[¿¼ÑÐ] 336Çóµ÷¼Á +5 rmc8866 2026-03-21 5/250 2026-03-21 17:24 by ѧԱ8dgXkO
[¿¼ÑÐ] 0805²ÄÁÏ320Çóµ÷¼Á +3 ÉÎïÓï 2026-03-20 3/150 2026-03-21 15:46 by Î޼ʵIJÝÔ­
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û