±±¾©Ê¯ÓÍ»¯¹¤Ñ§Ôº2026ÄêÑо¿ÉúÕÐÉú½ÓÊÕµ÷¼Á¹«¸æ
²é¿´: 2324  |  »Ø¸´: 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 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] Ò»Ö¾Ô¸±±½»´ó²ÄÁϹ¤³Ì×Ü·Ö358Çóµ÷¼Á +8 cs0106 2026-04-05 9/450 2026-04-06 12:50 by ÉÐË®¸óÖ÷
[¿¼ÑÐ] 346·ÖµÄÉúÎïÓëÒ½Ò©08600Çóµ÷¼Á +6 ³£ÓêÑôÉϰ¶ 2026-04-05 7/350 2026-04-06 12:36 by lys0704
[¿¼ÑÐ] 081700»¯Ñ§¹¤³ÌÓë¼¼Êõ Ò»Ö¾Ô¸Öк£Ñó 323 Çóµ÷¼ÁѧУ +17 ÅûÐÇºÓ 2026-04-03 17/850 2026-04-06 12:27 by ¿¼ÑÐѧУÕеãÈË
[¿¼ÑÐ] µ÷¼Á +9 ²»·ê´º 2026-04-05 10/500 2026-04-06 11:58 by ¿¼ÑÐѧУÕеãÈË
[¿¼ÑÐ] 297·Ö083200ÇóÖú +8 aekx 2026-04-05 8/400 2026-04-06 10:35 by imissbao
[¿¼ÑÐ] 285Çóµ÷¼Á +12 ŶßϺôo 2026-04-04 12/600 2026-04-06 09:48 by À¶ÔÆË¼Óê
[¿¼ÑÐ] Ò»Ö¾Ô¸Î人Àí¹¤´óѧ-085601²ÄÁϹ¤³Ì£¨×¨Ë¶£©-×Ü·Ö353Çóµ÷¼Á +3 2626262626li 2026-04-02 3/150 2026-04-06 09:08 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] ²ÄÁÏ334Çóµ÷¼Á +19 Eecho# 2026-04-03 19/950 2026-04-06 08:37 by ССÊ÷2024
[¿¼ÑÐ] 301Çóµ÷¼Á +6 ϸ°ûÏà¹Øµ°°× 2026-04-02 10/500 2026-04-06 08:34 by jp9609
[¿¼ÑÐ] Ò»Ö¾Ô¸Ö£ÖÝ´óѧ085600Çóµ÷¼Á +17 ³ÔµÄ²»ÉÙ 2026-04-05 20/1000 2026-04-06 00:32 by T¿É¿ÉÎ÷ÀïT
[Óлú½»Á÷] 3-äåßÁà¤-4-¼×È©ºÏ³É 10+3 Ñ©¸âÒ²Äܱ¬Õ¨ 2026-03-31 9/450 2026-04-06 00:24 by nBuï®
[¿¼ÑÐ] 320·ÖÈ˹¤ÖÇÄܵ÷¼Á +8 Õñ¡ªTZ 2026-04-03 8/400 2026-04-05 22:33 by ·¶Ê½Ë¼Î¬
[¿¼ÑÐ] 308Çóµ÷¼Á +3 ÖÕ²»ËÆ´Óǰ 2026-04-05 3/150 2026-04-05 22:23 by hemengdong
[¿¼ÑÐ] 262Çóµ÷¼Á +7 ÌìϵÚÒ»ÎÄ 2026-04-04 8/400 2026-04-05 21:31 by ¼¤Á÷Ó¶É
[¿¼ÑÐ] Ò»Ö¾Ô¸±±½»´ó²ÄÁϹ¤³Ì×Ü·Ö358Çóµ÷¼Á +6 cs0106 2026-04-05 6/300 2026-04-05 16:34 by imissbao
[¿¼ÑÐ] 319Çóµ÷¼Á +4 ÐÇÐDz»Õ£ÑÛà¶ 2026-04-03 4/200 2026-04-04 16:25 by ÖзÉÔº¿Õ¹ÜѧԺÑ
[¿¼ÑÐ] 322Çóµ÷¼Á +4 FZAC123 2026-04-03 4/200 2026-04-03 20:55 by zhq0425
[¿¼ÑÐ] ½¨»·£¬ÄÜÔ´£¬ÍÁľÀÏʦ·¹ý¿´Ò»¿´£¡£¡£¡ +5 ºÙºÙuu 2026-04-01 5/250 2026-04-03 11:47 by znian
[¿¼ÑÐ] 303·Ö 0807ѧ˶Çóµ÷¼Á +3 TYC3632 2026-04-01 3/150 2026-04-01 19:24 by lwk2004
[¿¼ÑÐ] »·¾³¹¤³Ìµ÷¼Á +9 hyzzzzzzz. 2026-04-01 9/450 2026-04-01 14:20 by salamander`
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û