| ²é¿´: 1379 | »Ø¸´: 13 | |||
| µ±Ç°Ö»ÏÔʾÂú×ãÖ¸¶¨Ìõ¼þµÄ»ØÌû£¬µã»÷ÕâÀï²é¿´±¾»°ÌâµÄËùÓлØÌû | |||
totoymyͳæ (СÓÐÃûÆø)
|
[ÇóÖú]
ÏëÒÔʱ¼äΪ²½³¤£¬dt=100ns£¬Ôõô²Ù×÷°¡£¿£¿
|
||
|
³ÌÐòÈçÏ£º MODULE PARA IMPLICIT NONE INTEGER*4, PARAMETER:: Ndim=12 REAL,DIMENSION(Ndim,5):: pp INTEGER*4::NOUT END MODULE PARA PROGRAM CM USE PARA IMPLICIT NONE INTEGER:: i,j,k INTEGER::t real::x,y,z REAL*8::r REAL::s,m OPEN (11, file='input.txt') READ(11,*) ((pp(i,j),j=1,4),i=1,Ndim) close(11) call random_seed() t=1 DO call random_number(r) k=1 s = 0.0 do while(k<=Ndim) s=s+pp(k,4) m=s-pp(k,4) if (m y=y+pp(k,2) z=z+pp(k,3) open(12,file="result.txt",access='append') write(12,*) x,y,z,t,k close(12) t = t + 1 end if k=k+1 enddo if (t>100) exit enddo end program cm ¾ÍÊÇ´Ó0µ½10¦Ìs£¬Ã¿²½100nsÑ»·100´Î£¬ÔõôÐ޸ģ¿ ĿǰֻÊÇÓÃÊý×Ö1-100¼Æ²½µÄ¡£¡£¡£ÈçºÎ×ö£¿ |
» ²ÂÄãϲ»¶
321Çóµ÷¼Á
ÒѾÓÐ4È˻ظ´
×Ü·Ö322ÇóÉúÎïѧ/Éú»¯Óë·Ö×Ó/ÉúÎïÐÅϢѧÏà¹Øµ÷¼Á
ÒѾÓÐ4È˻ظ´
085600²ÄÁÏÓ뻯¹¤306
ÒѾÓÐ5È˻ظ´
265Çóµ÷¼Á
ÒѾÓÐ15È˻ظ´
»¯Ñ§¹¤³Ì085602 305·ÖÇóµ÷¼Á
ÒѾÓÐ16È˻ظ´
¿¼Ñе÷¼Á
ÒѾÓÐ8È˻ظ´
289Çóµ÷¼Á
ÒѾÓÐ17È˻ظ´
Ò»Ö¾Ô¸±±¾©»¯¹¤´óѧ²ÄÁÏÓ뻯¹¤£¨085600£©296Çóµ÷¼Á
ÒѾÓÐ9È˻ظ´
Ò»Ö¾Ô¸»ªÀí£¬ÊýÒ»Ó¢Ò»285ÇóAÇøµ÷¼Á
ÒѾÓÐ6È˻ظ´
Ò»Ö¾Ô¸ Î÷±±´óѧ ×Ü·Ö282 Ó¢ÓïÒ»62 Çóµ÷¼Á
ÒѾÓÐ7È˻ظ´
jjdg
°æÖ÷ (ÖªÃû×÷¼Ò)
- ³ÌÐòÇ¿Ìû: 9
- Ó¦Öú: 223 (´óѧÉú)
- ¹ó±ö: 3.926
- ½ð±Ò: 51005.2
- ºì»¨: 238
- Ìû×Ó: 7227
- ÔÚÏß: 474.2Сʱ
- ³æºÅ: 27000
- ×¢²á: 2003-10-21
- רҵ: Ò©Îï´úлÓëÒ©ÎﶯÁ¦Ñ§
- ¹ÜϽ: ³ÌÐòÓïÑÔ
¡¾´ð°¸¡¿Ó¦Öú»ØÌû
¡ï
xzhdty(½ð±Ò+1): ллjjdg°ß°ß 2011-11-05 06:51:06
xzhdty(½ð±Ò+1): ллjjdg°ß°ß 2011-11-05 06:51:06
| Äãȥϸö·ÂÕæÈí¼þÀ´¸ÉÕâÖÖÊÂÇé°É£¡ |

13Â¥2011-11-04 23:41:18
holmescn
½ð³æ (ÕýʽдÊÖ)
- ³ÌÐòÇ¿Ìû: 37
- Ó¦Öú: 1 (Ó×¶ùÔ°)
- ½ð±Ò: 1918.8
- É¢½ð: 275
- ºì»¨: 1
- Ìû×Ó: 699
- ÔÚÏß: 102.6Сʱ
- ³æºÅ: 913482
- ×¢²á: 2009-11-26
- ÐÔ±ð: GG
- רҵ: Äý¾Û̬ÎïÐÔ II £ºµç×ӽṹ
¡¾´ð°¸¡¿Ó¦Öú»ØÌû
¡ï
xzhdty(½ð±Ò+1): лл²ÎÓë 2011-11-03 17:04:32
xzhdty(½ð±Ò+1): лл²ÎÓë 2011-11-03 17:04:32
|
ɨÁËÒ»ÑÛÄãµÄ´úÂ룬ûÓз¢ÏÖt²ÎÓëÔËËã¡£ Ê×ÏÈÄãÐèҪȷ¶¨Ë¯Ç°µÄtÊÇʲôµ¥Î»£¬ÊÇ΢Ã뻹ÊÇÄÉÃ롣Ȼºó¿´1µ½100¸ö²½³¤ÊǶ೤ʱ¼ä£¬×îºó°´ÕÕÄãÐèÒªµÄʱ¼ä³¤¶ÈÉ趨tµÄ²½³¤ºÍÖÕÖµ¾Í¿ÉÒÔÁË¡£ |
2Â¥2011-11-03 09:35:39
huruiusst
ľ³æ (СÓÐÃûÆø)
- Ó¦Öú: 1 (Ó×¶ùÔ°)
- ½ð±Ò: 2687.3
- Ìû×Ó: 67
- ÔÚÏß: 115.8Сʱ
- ³æºÅ: 1103368
- ×¢²á: 2010-09-19
- ÐÔ±ð: GG
- רҵ: ´«ÈÈ´«ÖÊѧ

3Â¥2011-11-03 09:54:42
snoopyzhao
ÖÁ×ðľ³æ (Ö°Òµ×÷¼Ò)
- ³ÌÐòÇ¿Ìû: 16
- Ó¦Öú: 157 (¸ßÖÐÉú)
- ¹ó±ö: 0.02
- ½ð±Ò: 18844.7
- ºì»¨: 29
- Ìû×Ó: 3803
- ÔÚÏß: 1422.4Сʱ
- ³æºÅ: 183750
- ×¢²á: 2006-02-13
- רҵ: ÎÛȾÉú̬»¯Ñ§
ben_ladeng: ר¼Ò¿¼ºË´æµµ 2011-11-03 17:49:43
|
ºÜÏÔÈ»¿ÉÒÔÑ»·£¬ÕâÖÖÑ»·Ã»ÓдÎÊýÏÞÖÆ£¬Óà exit Í˳ö£¬¶ÁÎļþ£¬ÎÒÒ»°ã¶¼ÓÃÕâÖÖÑ»·¡¡ |
4Â¥2011-11-03 12:09:23













»Ø¸´´ËÂ¥