Znn3bq.jpeg
±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 2331  |  »Ø¸´: 5

exabyss916

гæ (СÓÐÃûÆø)

[ÇóÖú] ifortºÍgfortranÎÞ¸ñʽÊä³öµÄÇø±ð

±ÈÈçÓÐÒ»¸ö³¤¶ÈΪ20µÄÊý×éA(20)£¬ÓÃÎÞ¸ñʽÊä³ö£º

write(10,*)A

gfortran±àÒëµÄ½á¹ûÕýÈ·ÏÔʾ£¬A(1)£¬A(2)£¬...£¬A(20)¶¼Êä³öµ½Ò»ÐС£

ifort±àÒëµÄ½á¹ûÈ´·ÖÐÐÏÔʾÁË£¬Ã¿ÐÐÖ»ÓÐ3¸öÊý£¬ÈçºÎÈÃÊä³ö½á¹ûÖ»ÓÐÒ»ÐУ¿
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

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

snoopyzhao

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

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï
ÓàÔó³É(½ð±Ò+1): лл²ÎÓëÓ¦Öú£¡ 2011-11-19 14:30:48
exabyss916(½ð±Ò+2): 2011-11-23 09:13:44
ÄÇÄã¾ÍÓøñʽ»¯·½Ê½Êä³ö¾ÍÊÇÁË¡­¡­
2Â¥2011-11-19 10:56:23
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÈñÀûµÄË鯬

ľ³æ (ÕýʽдÊÖ)

star watcher

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï
xzhdty(½ð±Ò+1): »¶Ó­³£À´³ÌÐòÓïÑÔ¿´¿´ 2011-11-19 12:38:07
exabyss916(½ð±Ò+2): 2011-11-23 09:13:12
do i=1,20
    write(*,'(G18.10)',advance='no') A(i)
end do
»òÕß
write(*,'(20G18.10)') A
ÎÞ¸ñʽÊä³öµÄ½á¹û²»Í¬±àÒëÆ÷¶¼²»Ò»Ñù£¬ËùÒÔÊä³öʱӦ¸ÃÃ÷È·¸ø³ö¸ñʽ¡£
3Â¥2011-11-19 11:02:42
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

magang26

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

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

exabyss916(½ð±Ò+1): 2011-11-30 15:11:53
ͳһ¥Éϵ쬏ñʽ»¯Êä³ö¡£
write(*,"(20F12.3)" (A(i),i=1,20)

²»Ã÷°×Â¥ÉϵÄGÊÇʲôÒâ˼£¿ÓÐÕâ¸öÀàÐÍ£¿
³É³¤°É
4Â¥2011-11-30 12:22:41
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

magang26

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

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï
jjdg(½ð±Ò+1): ¸Ðл²ÎÓë 2011-11-30 16:09:15
ͳһ¥Éϵ쬏ñʽ»¯Êä³ö¡£
write(*,"(20F12.3)" (A(i),i=1,20)

²»Ã÷°×Â¥ÉϵÄGÊÇʲôÒâ˼£¿ÓÐÕâ¸öÀàÐÍ£¿
³É³¤°É
5Â¥2011-11-30 12:23:26
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

snoopyzhao

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

¡¾´ð°¸¡¿Ó¦Öú»ØÌû

¡ï ¡ï
jjdg(½ð±Ò+1): ¸Ðл²ÎÓë 2011-11-30 16:09:03
ÓàÔó³É(½ð±Ò+1): лл²ÎÓëÓ¦Öú£¡ 2011-12-02 17:23:36
ÒýÓûØÌû:
5Â¥: Originally posted by magang26 at 2011-11-30 12:23:26:
ͳһ¥Éϵ쬏ñʽ»¯Êä³ö¡£
write(*,"(20F12.3)" (A(i),i=1,20)

²»Ã÷°×Â¥ÉϵÄGÊÇʲôÒâ˼£¿ÓÐÕâ¸öÀàÐÍ£¿

Fortran 77 ±ê×¼ÖÐÓÐÕâ¸öÀàÐÍ£¬²»¹ý²»³£Ó㬺Ǻǡ­¡­

[qutoe]
13.5.9.2.3 G Editing.
The Gw.d and Gw.dEe edit descriptors indicate that the external field occupies w positions, the fractional part of which consists of d digits, unless a scale factor greater than one is in effect, and the exponent part consists of e digits.

G input editing is the same as for F editing ( 13.5.9.2.1).

The method of representation in the output field depends on the magnitude of the datum being edited. Let N be the magnitude of the internal datum. If N < 0.1 or N >= 10**d,Gw.d output editing is the same as kPEw.d output editing and Gw.dEe output editing is the same as kPEw.dEe output editing, where k is the scale factor currently in effect. If N is greater than or equal to 0.1 and is less than 10**d , the scale factor has no effect, and the value of N determines the editing as follows:

________________________________________________
     |                       |                       |
     |_Magnitude_of_Datum____|__Equivalent_Conversion|
     |                       |                       |
     | 0.1=N<=1              |  F(w-n).d, n('b')     |
     |                       |                       |
     | 1<=N<10               |  F(w-n).(d-1), n('b') |
     |                       |                       |
     |   .                   |        .              |
     |   .                   |        .              |
     |   .                   |        .              |
     | 10**(d-2)<=N<10**(d-1)|  F(w-n).1, n('b')     |
     |                       |                       |
     | 10**(d-1)<=N<10**d    |  F(w-n).0, n('b')     |
     |                       |                       |
     |_______________________|_______________________|

    where: b is a blank

    n is 4 for Gw.d and e+2 for Gw.dEe

Note that the scale factor has no effect unless the magnitude of the datum to be edited is outside of the range that permits effective use of F editing. [/quote]
6Â¥2011-11-30 13:43:45
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ exabyss916 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 309Çóµ÷¼Á£¨Ò»Ö¾Ô¸ºþÄÏ´óѧ£© +15 ´ô¹½²»ÊÇ´÷·ò 2026-04-02 16/800 2026-04-08 21:45 by zhouxiaoyu
[¿¼ÑÐ] Ò»Ö¾Ô¸Î÷ÄÏ´óѧÉúÎïѧѧ˶344 ÇóÉúÎïѧÏà¹Øµ÷¼Á/ÉúÎïÓëÒ½Ò© +4 ³¬È˲»»á·É@ 2026-04-08 4/200 2026-04-08 21:18 by ѧԱtURuqU
[¿¼ÑÐ] 266µ÷¼Á +8 daya sun 2026-04-07 9/450 2026-04-08 20:27 by yutian743
[¿¼ÑÐ] 265Çóµ÷¼Á +3 ·ç˵ËýÔçÍüÁË 2026-04-07 3/150 2026-04-08 20:20 by ÄæË®³Ë·ç
[¿¼ÑÐ] 269Çóµ÷¼Á +6 °¡°¡ÎÒÎÒ 2026-04-07 6/300 2026-04-08 20:04 by ÎÒ¼õ·Ê1
[¿¼ÑÐ] 327Çóµ÷¼Á +9 Xxjc1107. 2026-04-06 10/500 2026-04-08 16:44 by luoyongfeng
[˶²©¼ÒÔ°] ÓÐûÓÐѧУ²ÄÁÏרҵÊÕ¿çµ÷(Ò»Ö¾Ô¸085410) +3 momo(Éϰ¶°æ) 2026-04-06 6/300 2026-04-08 14:53 by »¯Ñ§521
[¿¼ÑÐ] 287Çóµ÷¼Á +6 Fnhc 2026-04-07 6/300 2026-04-08 10:05 by xingguangj
[¿¼ÑÐ] 304Çóµ÷¼Á +10 ËØÄê¼ÀÓï 2026-04-06 17/850 2026-04-08 09:05 by À¶ÔÆË¼Óê
[¿¼ÑÐ] 344Çóµ÷¼Á +11 κ×Óper 2026-04-07 11/550 2026-04-07 23:01 by JourneyLucky
[¿¼ÑÐ] ×÷ÔÔ330µ÷¼Á +3 ÎÒÒªÉϺÃѧ 2026-04-02 4/200 2026-04-07 19:54 by biomichael
[¿¼ÑÐ] ¹¤¿Æ370Çóµ÷¼Á +3 äçÐļ弦µ° 2026-04-05 3/150 2026-04-06 10:55 by ÕâÊÇÒ»¸öÎÞÁĵÄê
[¿¼ÑÐ] Çóµ÷¼Á£¬Ò»Ö¾Ô¸Ö£ÖÝ´óѧ²ÄÁÏÓ뻯¹¤×¨Ë¶£¬Ó¢¶þÊý¶þ342·Ö£¬ÇóÀÏʦÊÕÁô +19 v12abo 2026-04-02 21/1050 2026-04-06 09:29 by À¶ÔÆË¼Óê
[¿¼ÑÐ] 296Çóµ÷¼Á +3 Íô£¡£¿£¡ 2026-04-05 4/200 2026-04-05 20:13 by à£à£à£0119
[¿¼ÑÐ] 081200-11408-276ѧ˶Çóµ÷¼Á +4 ´Þwj 2026-04-04 5/250 2026-04-05 14:06 by imissbao
[¿¼ÑÐ] 288Çóµ÷¼Á£¬Ò»Ö¾Ô¸»ªÄÏÀí¹¤´óѧ071005 +6 ioodiiij 2026-04-04 6/300 2026-04-05 10:09 by guoweigw
[¿¼ÑÐ] ²ÄÁÏרҵ383Çóµ÷¼Á +8 ¹ùÑôÑôÑô³É 2026-04-03 8/400 2026-04-04 10:29 by Rednal.
[¿¼ÑÐ] Ò»Ö¾Ô¸ÖØÇì´óѧ085404£¬×Ü·Ö314·Ö£¬Çóµ÷¼Á +4 zf83hn 2026-04-03 4/200 2026-04-03 21:25 by à£à£à£0119
[¿¼ÑÐ] 303Çóµ÷¼Á +3 һɫÇåÓð 2026-04-02 4/200 2026-04-03 10:22 by À¶ÔÆË¼Óê
[¿¼ÑÐ] ²ÄÁÏ340·Öµ÷¼Á +7 ÏÄÒ¹Íí·ç_long 2026-04-02 9/450 2026-04-02 21:20 by dongzh2009
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û