²é¿´: 1505  |  »Ø¸´: 7

astringent

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

[½»Á÷] ¡¾ÇóÖú¡¿Çë½Ì±àÒë¹ý³ÌÖеÄÁ½¸öÎÊÌ⡾ÒÑÍê½á¡¿ ÒÑÓÐ3È˲ÎÓë

ÎÒÔÚ±àÒëµÄʱºòÓöµ½ÏÂÃæ¼¸¸öÎÊÌ⣬Çë´ó¼Ò°ïæ¿´¿´
£¨1£©ÎÒÔÚ³ÌÐòÖÐдµÄÊÇ
do i=1£¬n
if (Ìõ¼þ1) then
-----
elseif (Ìõ¼þ2) then
------
elseif (Ìõ¼þ3) then
------
endif
if£¨Ìõ¼þ4£©A=1
enddo
µ«ÔÚ±àÒëʱ³öÏÖÏÂÃæµÄ´íÎó£º
endif
              1
Error: Expecting END DO statement at (1)
ÕâÊÇÎªÊ²Ã´ÄØ£¿

£¨2£©ÎÒÔÚµ÷ÓÃ×Ó³ÌÐòtest£¨nattot£©Ê±£¬Óöµ½ÏÂÃæµÄ´íÎó
double precision :: xxx(nattot),yyy(nattot),zzz(nattot)
                              1
Error: Variable 'nattot' cannot appear in the expression at (1)
ÎÒÔÚ×Ó³ÌÐòtestÖУ¬Ö»ÉùÃ÷ÁËnattotÊÇÕûÐͲ¢Ã»Óи³Öµ£¬µ«ÊÇÔÚÖ÷³ÌÐòÖÐÎÒÉùÃ÷nattotÊÇÕûÐÍ£¬²¢ÇÒ¸³ÖµÁËinterger£º£ºnattot=10.ÄѵÀÐèÒª½«nattotÓÃparameter¶¨Ò壿

[ Last edited by nono2009 on 2010-11-17 at 09:52 ]
»Ø¸´´ËÂ¥
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

snoopyzhao

ÖÁ×ðľ³æ (Ö°Òµ×÷¼Ò)

¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
nono2009(½ð±Ò+1):¹ÄÀøÓ¦Öú 2010-11-17 09:52:14
µÚÒ»¸öÎÊÌ⣬ÄãÇ°ÃæÓÐ do£¬ºóÃæÒªÓà enddo

µÚ¶þ¸öÎÊÌ⣬nattot ±ØÐëÊÇÒ»¸öÒÑÖªµÄ³£Á¿£¬Ëƺõ±ØÐëÓà parameter À´¶¨Òå¡­¡­
2Â¥2010-11-13 11:23:41
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ykwang

½ð³æ (ÕýʽдÊÖ)

¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
µÚÒ»¸öÎÊÌâ³öÔÚif£¨Ìõ¼þ4£©A=1ÉÏ£¬¸ÃÓï¾äÔÚFORTRAN77ÖÐÊÇÔÊÐíµÄ£¬µ«ÔÚаæFORTRAN90ÒÔÉϲ»ÍƼöʹÓá£ÕâÒ»²î±ðµ¼ÖÂÓÐЩ±àÒëÆ÷¿ÉÒÔͨ¹ý£¬ÓÐЩÔò±¨´í¡£Â¥Ö÷½«Æä¸ÄΪ
IF£¨Ìõ¼þ4£©THEN
  A=1
ENDIF
ÊÔÒ»ÊÔ¡£

µÚ¶þ¸öÎÊÌâ¼ûÂ¥ÉϵĻشð¡£
Nothing_Is_Impossible!
3Â¥2010-11-13 12:19:59
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

astringent

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

ÔÙÎÊһϣ¬ÎÒ¿´±ðÈ˵ijÌÐòʱ£¬ËûÔÚÖ÷³ÌÐòÖÐдµÄÊÇdouble precision cell£¨3£©£¬²¢´ÓÁíÒ»¸öÎļþÖжÁÈëcellµÄÖµ-1£¬È»ºóµ÷ÓÃÁË×Ó³ÌÐòtest£¨cell£©²¢ÔÚ×Ó³ÌÐòÖж¨Òådouble precision cell£¨*£©£¬ÎÒÏëÎÊһϣ¬×Ó³ÌÐòÖÐcellºóÃæÀ¨ºÅµÄ*ÊÇʲôÒâË¼ÄØ£¿Èç¹ûд³Écell£¨3£©Äܱí´ïͬÑùµÄÒâ˼Âð£¿
4Â¥2010-11-13 18:09:58
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ykwang

½ð³æ (ÕýʽдÊÖ)

¡ï ¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
nono2009(½ð±Ò+2):¹ÄÀøÓ¦Öú 2010-11-17 09:52:07
ÒýÓûØÌû:
Originally posted by astringent at 2010-11-13 18:09:58:
ÔÙÎÊһϣ¬ÎÒ¿´±ðÈ˵ijÌÐòʱ£¬ËûÔÚÖ÷³ÌÐòÖÐдµÄÊÇdouble precision cell£¨3£©£¬²¢´ÓÁíÒ»¸öÎļþÖжÁÈëcellµÄÖµ-1£¬È»ºóµ÷ÓÃÁË×Ó³ÌÐòtest£¨cell£©²¢ÔÚ×Ó³ÌÐòÖж¨Òådouble precision cell£¨*£©£¬ÎÒÏëÎÊһϣ¬×Ó³ÌÐòÖÐ ...

Ö÷³ÌÐòÖÐÓÃdouble precision cell£¨3£©¶¨ÒåCELLÊǶԵģ¬ÒòΪ3Ϊ³£Êý¡£ÔÚ×Ó³ÌÐòÖж¨Òådouble precision cell£¨*£©Ò²ÊǶԵ쬯äÖÐ*ºÅ±íʾȱʡ´óС£¬¼´Ö÷³ÌÐòÖж¨ÒåCELLÊǶà´ó£¬ÕâÀï¾Í°´¶à´ó´¦Àí¡£
Nothing_Is_Impossible!
5Â¥2010-11-13 18:51:08
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

astringent

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

ÒýÓûØÌû:
Originally posted by ykwang at 2010-11-13 18:51:08:


Ö÷³ÌÐòÖÐÓÃdouble precision cell£¨3£©¶¨ÒåCELLÊǶԵģ¬ÒòΪ3Ϊ³£Êý¡£ÔÚ×Ó³ÌÐòÖж¨Òådouble precision cell£¨*£©Ò²ÊǶԵ쬯äÖÐ*ºÅ±íʾȱʡ´óС£¬¼´Ö÷³ÌÐòÖж¨ÒåCELLÊǶà´ó£¬ÕâÀï¾Í°´¶à´ó´¦Àí¡£

ÄÇÎÒÔÚ×Ó³ÌÐòÖÐÖ±½Óд³Édouble precision cell£¨3£©Ðв»£¿Èç¹ûÕâÑùдÊÇ·ñºÍdouble precision cell£¨*£©µÃµ½ÏàͬµÄ½á¹û£¿
6Â¥2010-11-14 01:28:50
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ykwang

½ð³æ (ÕýʽдÊÖ)

ÒýÓûØÌû:
Originally posted by astringent at 2010-11-14 01:28:50:


ÄÇÎÒÔÚ×Ó³ÌÐòÖÐÖ±½Óд³Édouble precision cell£¨3£©Ðв»£¿Èç¹ûÕâÑùдÊÇ·ñºÍdouble precision cell£¨*£©µÃµ½ÏàͬµÄ½á¹û£¿

YES!
Nothing_Is_Impossible!
7Â¥2010-11-14 02:17:49
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

astringent

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

¶àл½â´ð£¡
8Â¥2010-11-14 05:26:14
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ astringent µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[»ù½ðÉêÇë] ¿´°åÉÏÕâô¶àÖеģ¬ÓеãÏñ50ÈËȺÀï49¸öÈ˶¼ÊÇÆ­×ÓµÄÄÇÖָоõ¡­¡­ +3 a089 2026-08-26 4/200 2026-08-27 08:25 by ZJTJZ
[»ù½ðÉêÇë] ͶƱ:  ÓжàÉÙÈËÊǽñÌì²éϵͳ֪µÀ½á¹ûµÄ£¿ +15 °®¿´ÊéµÄ¿ÉÀÖ 2026-08-26 17/850 2026-08-27 08:24 by xxniao123
[»ù½ðÉêÇë] »ù½ð²»ÖУ¬¹²Ãã +6 eulota 2026-08-26 6/300 2026-08-27 08:00 by zzuzxg
[»ù½ðÉêÇë] ÎÒ²»Àí½â£¡ +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[»ù½ðÉêÇë] 2026ÄêµÄ¹ú¼ÒÉç¿Æ»ù½ðÏîĿͨѶÆÀÉóµÄйæÔòÓëж¯Ïò¡¢ÐÂÌôÕ½ +7 process2012 2026-08-23 10/500 2026-08-26 19:23 by hmhminy
[»ù½ðÉêÇë] ϵͳ²é²»µ½ +10 ¶­°Ëǧ 2026-08-26 10/500 2026-08-26 16:30 by Equinoxhua
[»ù½ðÉêÇë] ·¶½øÖоÙÒ»ÎĵÄÖÐÐÄ˼Ïë +9 Ñ׻ƹóëÐ 2026-08-22 10/500 2026-08-26 15:40 by semaglutide
[»ù½ðÉêÇë] 2026Äê8ÔÂ25ÈÕ¹ú×ÔÈ»·Å°ñǰͻȻÊÕµ½ÁÐÈëÆÀÉóר¼ÒÓʼþ£¬ÓйØÏµÂ𣿠+25 ľˮ˼¶¹ 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[»ù½ðÉêÇë] ÄÜ·ñÍ˳ö²ÎÓëµÄÃæÉÏÏîÄ¿½â³ýÏÞÏî +23 koalala 2026-08-24 26/1300 2026-08-26 14:29 by ±¦±´³æ×Ó
[»ù½ðÉêÇë] ³öÀ´ÁË +9 trojank 2026-08-26 9/450 2026-08-26 14:25 by ±¦±´³æ×Ó
[»ù½ðÉêÇë] ¿ÆÑй¶ùÌ«ÄÑÁË +21 ÎÒ4´ó°×²Ë 2026-08-20 22/1100 2026-08-26 11:29 by nlgza
[»ù½ðÉêÇë] ¹ú¼ÊºÏ×÷¿É²éÁË£¬ÖÐÁËÃæÉÏ +18 Ldrop2023 2026-08-26 18/900 2026-08-26 11:15 by cmrandy
[»ù½ðÉêÇë] ÏîÄ¿ÐÅÏ¢ºÍ¾­·ÑÐÅÏ¢ÔÚϵͳÀï¶¼¿ÉÒÔ¿´µ½ÁË +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[»ù½ðÉêÇë] Ôõô¿´Çà»ùÖÐÁËûÓа¡ +4 Ò¶¾Å΢ 2026-08-26 4/200 2026-08-26 10:52 by xiacongxu
[Ö°³¡ÈËÉú] ѧÉúײ¼û¸¨µ¼Ô±ËÍÍâÂô£¬µÚ¶þÌìÈ«°à¶¼³ÁĬÁË +3 ¾¨ÓãÈÚ½ð_Õã½­_É 2026-08-22 3/150 2026-08-26 09:01 by zzuzxg
[»ù½ðÉêÇë] Å£À´£¡Ã×À´£¡ÃæÀ´£¡ +8 beefly 2026-08-26 8/400 2026-08-26 08:37 by xuzhipiao
[»ù½ðÉêÇë] Ã÷ÌìÓ¦¸Ã¿É²éÁË£¡£¿ +6 chengyan1220 2026-08-23 6/300 2026-08-25 19:45 by zfd97
[»ù½ðÉêÇë] ÈËÆø²»ÐÐÁË +11 fansofjerry 2026-08-21 11/550 2026-08-25 11:04 by ¹Â¶ÀµÄÓ¢ÐÛ6
[»ù½ðÉêÇë] ½¨Òé»ù½ð·¢²¼Ìáǰ¸ø³öÃ÷È·µÄʱ¼äµã +13 kulium 2026-08-21 16/800 2026-08-24 16:27 by superceng
[»ù½ðÉêÇë] Ó¦¸ÃÊÇÏÂÖÜÈý26ÈÕ¹«²¼Á˰ɣ¿ +4 ¹þ¹þ¸ò£¿ 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û