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

836449366

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

[ÇóÖú] Fortran³öÏÖÓï·¨´íÎó

ÎÒ×Ô¼º±àÁËÒ»¶Î³ÌÐò£¬¾ÍÊǽ«aaa.txtÖеÄÊý¾ÝµÄǰһÐмõÈ¥ºóÒ»ÐУ¬È»ºó·µ»Ø²îÖµ
ÕâÊdzÌÐò
      program main
      implicit none
      integer :: i,j
      real*8 r1,r2,a,m(200,2),n(200)
      open(10,file='bbb')
      do i=1,200
        read(10,*) a,(m(i,j),j=1,2)
        r1=m(i,2)
        r2=m(i+1,2)
        n=r1-r2
        write(*,"(a4,200F30.15)" i,n(i)
      enddo
      end
ÏÂÃæÊÇaaa.txtÎļþ
           1   11.5927413790973
           2   11.8587968919448
        ¡­¡­         ¡­¡­¡­¡­      
       200   11.7952433041584
ÔËÐкó×ÜÊdzöÏÖ´íÎó
fortcom: Error: xxx.f90, line 11: Syntax error, found IDENTIFIER 'I' when expecting one of: .EQV. .NEQV. .XOR. .OR. .AND. .LT. < .LE. <= .EQ. == .NE. /= .GT. > ...
        write(*,"(a4,200F30.15)" i,n(i)
---------------------------------^
compilation aborted for xxx.f90 (code 1)
Çó´óÉñ½â´ð£¬±¾È˲»Ê¤¸Ð¼¤£¡
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

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

jerkwin

ר¼Ò¹ËÎÊ (ÕýʽдÊÖ)

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

¡ï ¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
gkf¸ß: ½ð±Ò+2 2013-09-29 23:19:22
write(*,"(a4,200F30.15)" i,n(i)
ÓÐÎó, ӦΪ
write(*,'(I4,200F30.15)') i,n(i)
2Â¥2013-09-29 22:22:23
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

yongma2008

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

ÂÛÎÄ£¿¿à£¡Ö÷¡£

write(*,"(a4,200F30.15)" i,n(i)
---------------------------------^
Õâ¾ä»°ÒѾ­¸æËßÄãÔÚÄÄÓÐÎÊÌâÁË¡£ÒªÏ°¹ß¿´´íÎóÌáʾ
3Â¥2013-09-30 10:46:22
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

836449366

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

ÒýÓûØÌû:
2Â¥: Originally posted by jerkwin at 2013-09-29 22:22:23
write(*,"(a4,200F30.15)" i,n(i)
ÓÐÎó, ӦΪ
write(*,'(I4,200F30.15)') i,n(i)

¸ÄÁ˺󣬻¹ÊdzöÏÖÁË´íÎó
fortcom: Error: xxx.f90, line 13: Syntax error, found IDENTIFIER 'I' when expecting one of: .EQV. .NEQV. .XOR. .OR. .AND. .LT. < .LE. <= .EQ. == .NE. /= .GT. > ...
        write(*,"(I4,200F30.15)" i,n(i)
---------------------¡ª¡ª¡ª¡ª-----------^
compilation aborted for xxx.f90 (code 1)
4Â¥2013-09-30 14:06:51
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

gongxd325

ÖÁ×ðľ³æ (ÎÄ̳¾«Ó¢)

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

¡ï ¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
gmy1990: ½ð±Ò+2 2013-10-03 20:27:22
write(*,"(I4,200F30.15)" i,n(i)ÉÙÁ˸öÓÒÀ¨ºÅ£¬Ó¦¸ÃÊÇwrite(*,'(I4,200F30.15)') i,n(i)
Ò»¸öÈË×öµãºÃʲ¢²»ÄÑÄѵÄÊÇÒ»±²×Ó×öºÃÊÂ!!!
5Â¥2013-09-30 14:43:37
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

836449366

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

ÒýÓûØÌû:
2Â¥: Originally posted by jerkwin at 2013-09-29 22:22:23
write(*,"(a4,200F30.15)" i,n(i)
ÓÐÎó, ӦΪ
write(*,'(I4,200F30.15)') i,n(i)

ÏÖÔÚÒѾ­ÔËÐÐûÓз¢Éú´íÎóÁË£¬µ«²¢²»Äܵ¼³öÎÒÃÇËùÒªµÄ½á¹û£¿
Çó´óÉñ°ï棡
6Â¥2013-09-30 17:44:36
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

jerkwin

ר¼Ò¹ËÎÊ (ÕýʽдÊÖ)

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

¡ï ¡ï
gmy1990: ½ð±Ò+2 2013-10-03 20:27:28
read(10,*) a,(m(i,j),j=1,2)
        r1=m(i,2)
        r2=m(i+1,2)
        n=r1-r2
Âß¼­²»¶Ô, ×ÔÈ»²»ÊÇÄãÒªµÄ½á¹û
ÕâÀïi+1Ðл¹Ã»¶ÁÈë, Äã¾ÍʹÓÃÁË
7Â¥2013-09-30 21:24:24
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

836449366

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

ÒýÓûØÌû:
7Â¥: Originally posted by jerkwin at 2013-09-30 21:24:24
read(10,*) a,(m(i,j),j=1,2)
        r1=m(i,2)
        r2=m(i+1,2)
        n=r1-r2
Âß¼­²»¶Ô, ×ÔÈ»²»ÊÇÄãÒªµÄ½á¹û
ÕâÀïi+1Ðл¹Ã»¶ÁÈë, Äã¾ÍʹÓÃÁË

´óÉñ£¬Äܲ»ÄܰïÎҸĸģ¬ÔõÑùÐ޸IJÅÄܵõ½ÎÒÏëÒªµÄ½á¹û£¿
8Â¥2013-10-03 16:30:16
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

jerkwin

ר¼Ò¹ËÎÊ (ÕýʽдÊÖ)

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

¡ï ¡ï
gkf¸ß: ½ð±Ò+2 2013-10-03 23:25:12
×î¼òµ¥µÄ, ¾ÍÊÇÏȶÁ½øÀ´, ÔÙд¸öÑ­»·×ö²î
»òÕß
Ö»¶ÁÒ»±é, ¸ù¾ÝÌõ¼þд²î
9Â¥2013-10-03 21:43:02
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ 836449366 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 286Çóµ÷¼Á +3 lim0922 2026-03-26 3/150 2026-03-26 23:07 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] 08¹¤Ñ§µ÷¼Á +13 Óû§573181 2026-03-20 20/1000 2026-03-26 21:22 by Óû§573181
[¿¼ÑÐ] 325Çóµ÷¼Á +3 Aoyijiang 2026-03-23 3/150 2026-03-26 20:46 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] Çóµ÷¼Á +6 °×QF 2026-03-21 6/300 2026-03-26 20:37 by fmesaito
[¿¼ÑÐ] Ò»Ö¾Ô¸211 ³õÊÔ270·Ö Çóµ÷¼Á +6 ¹ÈÓêÉϰ¶ 2026-03-23 7/350 2026-03-26 18:55 by ²»³Ôô~µÄ؈
[¿¼ÑÐ] 085601Çóµ÷¼Á×Ü·Ö293Ó¢Ò»Êý¶þ +4 ¸ÖÌú´óÅÚ 2026-03-24 4/200 2026-03-26 16:28 by dick_runner
[¿¼ÑÐ] 263Çóµ÷¼Á +6 yqdszhdap£­ 2026-03-22 10/500 2026-03-26 13:11 by ¹«èªåÐÒ£
[¿¼ÑÐ] 291 Çóµ÷¼Á +7 »¯¹¤2026½ì±ÏÒµÉ 2026-03-21 8/400 2026-03-26 11:25 by AlenQIN.
[¿¼ÑÐ] ¿¼Ñе÷¼Á +6 À´ºÃÔËÀ´À´À´ 2026-03-21 7/350 2026-03-25 22:43 by 418490947
[¿¼ÑÐ] ²ÄÁÏר˶ 335 ·ÖÇóµ÷¼Á +4 ¾Ü¾øÀ䱩Á¦ 2026-03-25 4/200 2026-03-25 18:45 by haxia
[¿¼ÑÐ] 318Çóµ÷¼Á +3 plumÀî×Ó 2026-03-23 3/150 2026-03-25 09:42 by ÎíÉ¢ºóÏàÓölc
[¿¼ÑÐ] »·¾³Ñ§Ë¶288Çóµ÷¼Á +8 ƤƤƤ123456 2026-03-22 8/400 2026-03-23 23:47 by ÈÈÇéɳĮ
[¿¼ÑÐ] 269Çóµ÷¼Á +4 ÎÒÏë¶ÁÑÐ11 2026-03-23 4/200 2026-03-23 21:25 by pswait
[¿¼ÑÐ] Ò»Ö¾Ô¸ÖØÇì´óѧ085700×ÊÔ´Óë»·¾³£¬×Ü·Ö308Çóµ÷¼Á +7 īīĮ 2026-03-23 8/400 2026-03-23 20:36 by Creta
[¿¼ÑÐ] ½ÓÊÕ2026˶ʿµ÷¼Á(ѧ˶+ר˶) +4 allen-yin 2026-03-23 6/300 2026-03-23 15:04 by Íô£¡£¿£¡
[¿¼ÑÐ] Çóµ÷¼ÁԺУÐÅÏ¢ +6 CX 330 2026-03-21 6/300 2026-03-22 15:25 by ÎÞи¿É»÷111
[¿¼ÑÐ] ÉúÎïѧµ÷¼Á +5 Surekei 2026-03-21 5/250 2026-03-22 14:39 by tcx007
[¿¼ÑÐ] ¿¼Ñе÷¼Á +3 ºôºô£¿~+123456 2026-03-21 3/150 2026-03-21 20:04 by Î޼ʵIJÝÔ­
[¿¼ÑÐ] Ò»Ö¾Ô¸ÄÏ´ó£¬0703»¯Ñ§£¬·ÖÊý336£¬Çóµ÷¼Á +3 ÊÕµ½VS 2026-03-21 3/150 2026-03-21 18:42 by ѧԱ8dgXkO
[¿¼ÑÐ] Ò»Ö¾Ô¸Éî´ó£¬0703»¯Ñ§£¬×Ü·Ö302£¬Çóµ÷¼Á +4 ÆßÔÂ-ÆßÆß 2026-03-21 4/200 2026-03-21 18:20 by ѧԱ8dgXkO
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û