Znn3bq.jpeg
²é¿´: 2151  |  »Ø¸´: 23
µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû

xk6891

ÖÁ×ðľ³æ (ÖøÃûдÊÖ)


[½»Á÷] ¡¾ÇóÖú¡¿ÈçºÎʵÏÖÊý×Ö½ôÌù×ÖĸÊäÈë

H  1
H  2
H  3
H  4
H  5
H  6
H  7
H  8
H  9
H 10
H 11
H 12
Çë½Ìǰ±²£¬ÈçºÎÈúóÃæµÄÊý×Ö½ôÌù×Å×ÖĸÊäÈëÄØºóÃæ»¹Óм¸°ÙÐÐ
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

» ÇÀ½ð±ÒÀ²£¡»ØÌû¾Í¿ÉÒԵõ½:

²é¿´È«²¿É¢½ðÌù

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

xk6891

ÖÁ×ðľ³æ (ÖøÃûдÊÖ)


ÒýÓûØÌû:
Originally posted by uiui at 2011-01-12 13:49:20:
ÔÚcall random_seedʱ²»Òª¼Ó²ÎÊý

Çë½Ì¸öÎÊÌ⣬ÓÃfortran¶ÁÈ¡Îļþ±àÒëͨ¹ý£¬µ«ÊǶÁÈ¡µÄʱºò³öÏÖÕâ¸ö´íÎó¡°Fortran runtime error: End of file¡±£¬ÌùÉÏ˵ÔÚÎı¾µÄ×îºóÇÃenter£¬µ«ÊÇû½â¾ö£¨×òÌì³É¹¦¶ÁÈ¡ÁË£¬½ñÌìÓÖ²»ÐÐÁË£©
²Î¿¼µÄÊÇÕâ¸öÌû×Óhttp://muchong.com/bbs/viewthread.php?tid=2760897ÀïÃæµÄcode
10Â¥2011-01-13 10:19:56
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
²é¿´È«²¿ 24 ¸ö»Ø´ð

uiui

гæ (СÓÐÃûÆø)


¡ï ¡ï ¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
xk6891(½ð±Ò+5):ллǰ±²£¬ÎÊÌâ½â¾öÁË¡£ÓÃÁ˵ڶþÖÖ·½·¨ 2011-01-12 10:32:06
ÓàÔó³É(½ð±Ò+3):лл²ÎÓëÓ¦Öú£¡ 2011-01-13 19:47:34
program align_left_output_1
  
   do i=1,200
      L=int(log10(i*1.0))+1
      write(*,100) i
   enddo
   100 format('H'I

end program


program align_left_output_2
   character*8 tmpchar

   do i=1,200
      write(tmpchar,'(I8)') i
      write(*,*) 'H'//adjustl(tmpchar)
   enddo

end program

µÚÒ»ÖÖ·½·¨ÐÎʽ¼òµ¥£¬ÈÝÒ×Àí½â¡£µ«±ä¿í¶ÈÊä³öÒÀÀµÓÚ±àÒëÆ÷£¬¿ÉÒÆÖ²ÐÔ²»ºÃ£»¶øÇÒÓõ½Á˶ÔÊýÔËË㣬ÔÚÊý¾ÝÁ¿ºÜ´óʱЧÂʽϵ͡£
µÚ¶þÖÖ·½·¨½èÓÃÁËÁÙʱ×Ö·û´®×öÄÚ²¿Îļþ£¬Ð§ÂÊ¿ÉÄܸü¸ßһЩ¡£
2Â¥2011-01-12 09:17:49
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

xk6891

ÖÁ×ðľ³æ (ÖøÃûдÊÖ)


ÒýÓûØÌû:
Originally posted by uiui at 2011-01-12 09:17:49:
program align_left_output_1
  
   do i=1,200
      L=int(log10(i*1.0))+1
      write(*,100) i
   enddo
   100 format('H'I

end program


program align_left_output_2
   charact ...

Çë½Ìǰ±²Ò»¸öÎÊÌ⣬call random_seed²úÉúËæ»úÊýµÄʱºò£¬ÍøÉÏ˵µÄ»á¸ù¾ÝϵͳµÄÈÕÆÚºÍʱ¼äÌṩÖÖ×Ó£¬µ«ÊÇÎÒÿ´Î±àÒ붼ûÓиı䣬Çó½ÌÒ»ÏÂÕâÊÇΪºÎ£¬ÈçºÎʹËüÄÜÉú³É²»Í¬µÄËæ»úÊýÁС£
3Â¥2011-01-12 10:37:14
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

uiui

гæ (СÓÐÃûÆø)


¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû½»Á÷
ÔÚcall random_seedʱ²»Òª¼Ó²ÎÊý
4Â¥2011-01-12 13:49:20
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] ²ÄÁÏÓ뻯¹¤µ÷¼Á +12 ·ñ¼«Ì©À´2026 2026-04-10 13/650 2026-04-11 00:28 by wangjihu
[¿¼ÑÐ] 085600²ÄÁÏÓ뻯¹¤329·ÖÇóµ÷¼Á +8 Ò¶zilin 2026-04-10 8/400 2026-04-10 23:26 by 314126402
[¿¼ÑÐ] 295Çóµ÷¼Á +4 ?ÒªÉϰ¶? 2026-04-05 5/250 2026-04-10 23:05 by Ftglcn90
[¿¼ÑÐ] 277 ÊýÒ»104£¬Ñ§Ë¶£¬Çóµ÷¼Á +17 Æ¿×ÓPZ 2026-04-09 18/900 2026-04-10 22:47 by À´¿´Á÷ÐÇÓê10
[¿¼ÑÐ] ÉúÎïѧµ÷¼Á +3 СȽҪŬÁ¦ 2026-04-10 4/200 2026-04-10 22:25 by plum
[¿¼ÑÐ] һ־Ը˫·Ç085400µç×ÓÐÅÏ¢344 Çóµ÷¼Á£¬¶Ô²ÄÁϺͻ¯Ñ§·½ÏòÒ²¸ÐÐËȤ +8 ÎÞÇéµÄСÑò 2026-04-09 9/450 2026-04-10 09:30 by ËÉ»¨¸×1201
[¿¼ÑÐ] ¹¤¿Æ273µ÷¼Á +5 X1999 2026-04-09 6/300 2026-04-10 07:52 by 1753564080
[¿¼ÑÐ] ²ÄÁÏר˶³õÊÔ·Ö332Ò»Ö¾Ô¸Î÷±±¹¤Òµ´óѧ£¬ +12 ¹ÊÈË?? 2026-04-09 12/600 2026-04-09 18:34 by Ccclqqq
[¿¼ÑÐ] 085404 293Çóµ÷¼Á +7 ÓÂÔ¶¿â°®314 2026-04-08 7/350 2026-04-09 16:02 by Öí»á·É
[¿¼ÑÐ] 281Çóµ÷¼Á +10 Ò¬×ÓÄ¢¹½ 2026-04-06 10/500 2026-04-08 11:43 by zzucheup
[¿¼ÑÐ] 304Çóµ÷¼Á£¨085602£¬¹ýËļ¶£¬Ò»Ö¾Ô¸985£© +25 »¯¹¤ÈË999 2026-04-04 26/1300 2026-04-07 22:06 by hemengdong
[¿¼ÑÐ] ũѧ£¬Çóµ÷¼Á£¬314·Ö +4 ·Ã¿Í¼Ç¼¿É°® 2026-04-04 4/200 2026-04-07 21:07 by µÈ°¶
[¿¼ÑÐ] 312Çóµ÷¼Á +18 gtw1 2026-04-06 20/1000 2026-04-07 18:16 by À¶ÔÆË¼Óê
[¿¼ÑÐ] 085404 293Çóµ÷¼Á +8 ÓÂÔ¶¿â°®314 2026-04-06 9/450 2026-04-07 13:05 by flydream1314
[¿¼ÑÐ] ¿¼Ñе÷¼Á +7 15615482637 2026-04-04 7/350 2026-04-06 22:56 by chenzhimin
[¿¼ÑÐ] 297·Ö083200ÇóÖú +9 aekx 2026-04-05 9/450 2026-04-06 20:57 by flysky1234
[¿¼ÑÐ] 308Çóµ÷¼Á +3 ÖÕ²»ËÆ´Óǰ 2026-04-05 3/150 2026-04-05 20:07 by à£à£à£0119
[¿¼ÑÐ] Ò»Ö¾Ô¸±±¾©½»Í¨´óѧ²ÄÁϹ¤³Ì×Ü·Ö358Çóµ÷¼Á +4 cs0106 2026-04-04 4/200 2026-04-05 18:46 by imissbao
[¿¼ÑÐ] Ò»Ö¾Ô¸Çà¿Æ085500£¬³õÊÔ295·Ö£¬¹«¹²¿Î213·Ö +3 Óöµ½µÄÈËÔ¸Íû¶¼Ä 2026-04-05 3/150 2026-04-05 18:45 by À¶ÔÆË¼Óê
[¿¼ÑÐ] Çóµ÷¼Á +3 ũҵ¹¤³ÌÓëÐÅÏ¢¼ 2026-04-04 3/150 2026-04-04 12:19 by Éá¶øºóµÃ
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û