Znn3bq.jpeg
²é¿´: 2159  |  »Ø¸´: 2

yty3026

гæ (³õÈëÎÄ̳)

[ÇóÖú] ÇóÖúfortran´ò¿ª¶à¸öÎļþ

ÇóÖú¸÷λ´óÉñ£¬ÎÒÏëʵÏÖÒÔÏÂÄÚÈÝ£º×öÑ­»·£¬i=1£¬Ä³Îļþ¼ÐÉú³ÉÎļþ1.txt£¬´ËʱÓÉfortran´ò¿ªÕâ¸öÎļþ£¬½«ÀïÃæÄ³Áи³Öµ¸øÐµÄtxt£¬±ÈÈçnew.txt£»i=2£¬Ä³ÏàͬÎļþ¼ÐÉú³É2.txt£¬´ËʱÓÉfortran´ò¿ªÕâ¸öÎļþ£¬½«ÀïÃæ¶ÔÓ¦ÁеÄÖµÓënew.txt¶ÔÓ¦ÖµÏà¼Ó¡£i=3£¬Ä³ÏàͬÎļþ¼ÐÉú³É3.txt£¬Ä³ÏàͬÎļþ¼ÐÉú³É3.txt£¬´ËʱÓÉfortran´ò¿ªÕâ¸öÎļþ£¬½«ÀïÃæ¶ÔÓ¦ÁеÄÖµÓënew.txt¶ÔÓ¦ÖµÏà¼Ó¡£
ÎÒµÄÎÊÌâÊÇ£¬ÈçºÎ¿ÉÒÔÈÃfortranʵÏÖÿ´Î´ò¿ªi.txt¡£Õâ¸öiµÄÑ­»·ÊÇÔÚpythonÖÐÑ­»·µÄ£¬¼´1.txt£¬2.txtµÄÉú³ÉÊÇͨ¹ýpythonʵÏֵ쬵«ÊÇÐèÒªfortran°´ÕÕÉÏÊöÏë·¨À´¶ÁÈ¡²¢¸³Öµ¸ønew.txt
Ï£Íû´ó¼Ò¿ÉÒÔ°ïæ½â´ðÏÂ
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

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

jerkwin

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

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

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
ÂÞàÂ, ÖØÐÂÉè¼ÆË¼Â·.
2Â¥2013-10-22 07:19:55
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÉîÀ¶Ö®×Ó

Òø³æ (³õÈëÎÄ̳)

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

¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
ÄãÕâ¸öÎÊÌâÓõ½µÄ¾ÍÊÇfortranÅú´¦Àí´ò¿ª¶à¸öÎļþ£¬ÖÁÓÚÄãµÄÄÇЩ¶ÔÓ¦ÖµÏà¼Ó£¬ÎҾͲ»¹ÜÁË¡£¸øÄ㼸¾ä³ÌÐò°É£¬×Ô¼ºÈ¥×Áĥһϡ£
character(len=12) filename(nt)   

open(1,file='D:\filename.txt')
do i=1,nt
    read(1,*) filename(i)
enddo
close(1)

open(3,file="D:\"//filename(i))
ÆäÖÐfilename.txtÀïÃæ´æ´¢µÄÊÇÎļþÃû£¬±ÈÈçÄãÉÏÃæ½²µ½µÄ£º1.txt,2.txt,3.txt¡£µÚÈý¾ä»°µÄopenÀïÃæµÄ//ÊÇÒ»¸öÁ¬½Ó·û¡£fortranÈçºÎ´ò¿ª¶à¸öÎļþµÄºËÐIJ¿·Ö¶¼¸øÄã˵ÁË£¬ÆäËûµÄ¶«Î÷£¬¾Í¿¿Äã×Ô¼ºÈ¥¸ã¶¨°É¡£
3Â¥2013-10-23 00:53:05
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ yty3026 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 290µ÷¼ÁÉúÎï0860 +28 ÍÛ¹þ¹þ£¬¡£ 2026-04-11 31/1550 2026-04-13 01:16 by ÐÒÃâ ..
[¿¼ÑÐ] 0831Ò»ÂÖµ÷¼Áʧ°ÜÇóÖú +10 СÐÜî£î£_s 2026-04-11 10/500 2026-04-12 22:43 by ³¤¹­°Á
[¿¼ÑÐ] 293Çóµ÷¼Á +12 ÎÒ°®¸ßÊý¸ßÊý°®Î 2026-04-12 13/650 2026-04-12 21:32 by wangluhui
[¿¼ÑÐ] 322Çóµ÷¼Á +6 123°²¿µ 2026-04-12 13/650 2026-04-12 15:51 by 123°²¿µ
[¿¼ÑÐ] 307Çóµ÷¼Á +10 tzq94092 2026-04-10 10/500 2026-04-12 08:18 by wise999
[¿¼ÑÐ] 290Çóµ÷¼Á +13 luoziheng 2026-04-10 13/650 2026-04-11 23:15 by labixiaoqiao
[¿¼ÑÐ] 0859£¬337Çóµ÷¼Á +4 ÑÐs. 2026-04-10 4/200 2026-04-11 11:34 by caotw2020
[¿¼ÑÐ] »úеר˶270Çóµ÷¼Á£¬½ÓÊÜ¿çרҵ +12 ÀÏʦ¿´¿´ÎÒ°Éaba 2026-04-09 14/700 2026-04-11 10:21 by laoshidan
[¿¼ÑÐ] 080100Á¦Ñ§316Çóµ÷¼Á +8 L_Hairui 2026-04-07 8/400 2026-04-11 10:00 by zhq0425
[¿¼ÑÐ] 311Çóµ÷¼Á +13 xypÏë¶ÁÊé 2026-04-10 14/700 2026-04-11 09:41 by Öí»á·É
[¿¼ÑÐ] 298Çóµ÷¼Á +9 ¶¤¶£ß˶¬¹Ï 2026-04-07 11/550 2026-04-11 09:35 by zhq0425
[¿¼ÑÐ] 284Çóµ÷¼Á +12 archer.. 2026-04-10 13/650 2026-04-11 08:44 by zhq0425
[¿¼ÑÐ] ±¾¿Æ211 ¹¤¿Æ085400 280·ÖÇóµ÷¼Á ¿É¿çרҵ +11 LZH£¨µÈ´ýµ÷¼ÁÖÐ 2026-04-10 11/550 2026-04-11 08:39 by zhq0425
[¿¼ÑÐ] ²ÄÁÏÓ뻯¹¤µ÷¼Á +12 ·ñ¼«Ì©À´2026 2026-04-10 13/650 2026-04-11 00:28 by wangjihu
[¿¼ÑÐ] ±¾9 Ò»Ö¾Ô¸Î÷¹¤´ó085601 324Çóµ÷¼Á +5 wysyjs25 2026-04-10 5/250 2026-04-10 16:57 by luoyongfeng
[¿¼ÑÐ] ±¾¿ÆÎ÷¹¤´ó 0856 324Çóµ÷¼Á +10 wysyjs25 2026-04-09 11/550 2026-04-10 08:37 by 5268321
[¿¼ÑÐ] ²ÄÁÏר˶µ÷¼Á +16 ¹þ¹þ¹þºðºðºð¹þ 2026-04-07 17/850 2026-04-09 21:16 by wutongshun
[¿¼ÑÐ] Ò»Ö¾Ô¸Öйú¿ÆÑ§ÔºÉϺ£ÓлúËù£¬Óлú»¯Ñ§356·ÖÕÒµ÷¼Á +11 Nadiums 2026-04-09 11/550 2026-04-09 18:04 by lijunpoly
[¿¼ÑÐ] 368»¯Ñ§Çóµ÷¼Á +13 wwwwabcde 2026-04-07 14/700 2026-04-09 14:47 by heaven_jay
[¿¼ÑÐ] 0860004 Çóµ÷¼Á 309·Ö +6 Yin DY 2026-04-09 6/300 2026-04-09 10:19 by °¡Àî999
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û