| ²é¿´: 716 | »Ø¸´: 3 | |||
[½»Á÷]
ÎÊÒ»¸ö¹ØÓÚº¯Êýµ÷ÓõÄСÎÊÌâ
|
|
Çë½Ì¸öÎÊÌ⣬¿´¿´ÎÒÕâ¸öº¯Êý£¬fortran77дµÄ£º FUNCTION HEAVI(PRIS) REAL*8 PRIS IF(PRIS.GT.0.0) THEN HEAVI=1.0 ENDIF RETURN C IF(PRIS.LT.0.0) THEN HEAVI=0.0 ENDIF RETURN END µ÷ÓõÄʱºò³öÏÖÏÂÁÐÇé¿ö£º HEAVI(-3)=1.00000000000000£¬ HEAVI(-3.0D0)=0.000000000000000E+000£¬ HEAVI(-3.0)=1.00000000000000 HEAVI(3)=1.00000000000000£¬ HEAVI(3.0D0)=1.000000000000000E+000£¬ HEAVI(3.0)=1.00000000000000 ²»ÖªµÀʲôÔÒò£¿ ¸Ä³ÉÕâÑùÔõô¾ÍºÃÁËÄØ£¿ Program ex005 real HEAVI write(*,*) HEAVI(3.0d0) end FUNCTION HEAVI(PRIS) REAL PRIS Real HEAVI IF(PRIS.GT.0.0) THEN HEAVI=1.0 else HEAVI=0.0 ENDIF RETURN END ÓïÑÔFortran77£¬gfortran»·¾³¡£ Çó½âÊÍ¡£ |
» ²ÂÄãϲ»¶
½¹ÂÇ
ÒѾÓÐ13È˻ظ´
Ò»Ö¾Ô¸985£¬±¾¿Æ211£¬0817»¯Ñ§¹¤³ÌÓë¼¼Êõ319Çóµ÷¼Á
ÒѾÓÐ8È˻ظ´
0817 »¯Ñ§¹¤³Ì 299·ÖÇóµ÷¼Á ÓпÆÑоÀú ÓжþÇøÎÄÕÂ
ÒѾÓÐ9È˻ظ´
346Çóµ÷¼Á[0856]
ÒѾÓÐ5È˻ظ´
285»¯¹¤Ñ§Ë¶Çóµ÷¼Á£¨081700£©
ÒѾÓÐ11È˻ظ´
267Ò»Ö¾Ô¸ÄϾ©¹¤Òµ´óѧ0817»¯¹¤Çóµ÷¼Á
ÒѾÓÐ9È˻ظ´
274Çóµ÷¼Á
ÒѾÓÐ6È˻ظ´
Çó²ÄÁϵ÷¼Á
ÒѾÓÐ10È˻ظ´
±¾¿ÆÖ£ÖÝ´óѧÎïÀíѧԺ£¬Ò»Ö¾Ô¸»ª¿Æ070200ѧ˶£¬346Çóµ÷¼Á
ÒѾÓÐ4È˻ظ´
¹ú×Ô¿ÆÃæÉÏ»ù½ð×ÖÌå
ÒѾÓÐ8È˻ظ´
» ±¾Ö÷ÌâÏà¹Ø¼ÛÖµÌùÍÆ¼ö£¬¶ÔÄúͬÑùÓаïÖú:
Çë½Ì¸öÎÊÌ⣬ΪɶÎҵIJåÖµµã»á³öÏÖ²¨¶¯£¬ÊÇÎÒµ÷Óú¯ÊýµÄÎÊÌâÂð£¿
ÒѾÓÐ3È˻ظ´
matlabÈçºÎ¸Ä±äº¯Êý±äÁ¿ÖµÔÚµ÷Óú¯ÊýÖØÐ¼ÆËã
ÒѾÓÐ12È˻ظ´
matlabµÄº¯Êýµ÷ÓÃÎÊÌâ
ÒѾÓÐ3È˻ظ´
¹ØÓÚerfinvº¯Êýµ÷ÓôíÎóµÄÎÊÌâ
ÒѾÓÐ4È˻ظ´
Ò»¸ö¹¹Ô캯Êýµ÷ÓÃÎÊÌâ¡¡
ÒѾÓÐ4È˻ظ´
Çë½ÌÈçºÎµ÷ÓÃModuleÀïÃæµÄº¯Êý£¬Ð»Ð»
ÒѾÓÐ6È˻ظ´
intel fortran ÈçºÎµ÷Óà matlabÀïÃæµÄº¯Êý
ÒѾÓÐ5È˻ظ´
²ËÄñÎÊÌ⣺VC++µ÷Óú¯Êý¹Ø±Õ×Ó´°¿ÚµÄÎÊÌâ
ÒѾÓÐ4È˻ظ´
¡¾ÌÖÂÛ¡¿¹ØÓÚÒ»¸ömÎļþÖк¯Êýµ÷Óü°»Í¼ÎÊÌâ
ÒѾÓÐ7È˻ظ´
¡¾½»Á÷¡¿VC++, C#, VB´ðÒÉרÌù
ÒѾÓÐ145È˻ظ´
» ÇÀ½ð±ÒÀ²£¡»ØÌû¾Í¿ÉÒԵõ½:
ÉÜÐË´óѧ²©Ê¿½ÌʦÕÐÆ¸1루»¯Ñ§»¯¹¤Ïà¹Ø£©
+5/320
Öйú¿ÆÑ§Ôºº¼ÖÝҽѧÑо¿-³£ð©Ñо¿Ô±¿ÎÌâ×鲩ʿºóÕÐÆ¸
+1/287
ÎïÀíѧ µ÷¼Á
+1/88
¼ÃÄÏ´óѧÁÖÐã¾ê½ÌÊÚÕÐÊÕ²ÄÁÏÀ಩ʿÉú
+1/87
ÎïÀíѧ µ÷¼Á
+1/84
¸£½¨Ê¦·¶´óѧÕÐÊÕ2026Ä껯ѧ¡¢²ÄÁÏ˶ʿ3-4Ãû
+1/80
Õã½Å©ÁÖ´óѧÕÐÊÕµ÷¼Á
+1/80
Ô¸Óö¼ûÄ㣬Óö¼û²»Ö¹²Á¼ç¶ø¹ýµÄÔµ·Ö
+1/74
¸Õ¸Õ¹¤×÷²»¾ÃµÄ¹Â¶À¸Ð
+1/36
¹þ¹¤´óÖ£ÖݸߵÈÑо¿ÔºÁõÉÜÇÙÓë²éÕý±¦½ÌÊÚ¿ÎÌâ×é³ÏÕкϳÉÉúÎïѧ±³¾°Ïà¹ØµÄÓÅÐãÈ˲żÓÃË
+1/34
°Ä´óÀûÑÇÎ÷°Ä´óѧ£¨UWA£©ÕŽðÇ¿¿ÎÌâ×éÕÐÊÕÈ«½±²©Ê¿Éú£¨»¯¹¤ÐÂÄÜÔ´·½Ïò£©
+1/32
ÖпÆÔºÉú̬»·¾³Ñо¿ÖÐÐĹúÖØÊµÑéÊÒÕÐÆ¸¿Í×ùÑо¿Éú1-2Ãû
+1/31
ÄϾ©Àí¹¤´óѧÓÅÇàÍŶÓÕÐÆ¸¸±½ÌÊÚ¡¢²©Ê¿ºó¡¢²©Ê¿¡¢Ë¶Ê¿Éú£¨»¯Ñ§¡¢´ß»¯·½Ïò£©
+1/31
ҽѧ327·Öר˶µ÷¼Á
+1/16
ÐÂ¼ÓÆÂ¹úÁ¢´óѧҩѧϵ»¯Ñ§ÉúÎïѧ¿ÎÌâ×éÕÐPhD
+1/13
ÄϾ©Àí¹¤´óѧ2026¼¶Ë¶Ê¿ÉúÕÐÉú-ÕŹâÆÕ²©µ¼ &˶µ¼
+2/12
¡¾²©Ê¿ÕÐÉú¡¿Î人¿Æ¼¼´óѧÕÐÊÕ²ÄÁÏ¡¢»¯¹¤¡¢»·¾³¡¢Ò±½ðÀà2026Äê¡°ÉêÇë-¿¼ºË¡±ÖƲ©Ê¿Éú
+1/8
ÉϺ£¿Æ¼¼´óѧÎïÖÊѧԺÕÐÊÕÓлú»¯Ñ§·½Ïò2026¼¶¹¤³Ì²©Ê¿
+1/7
»ªÖпƼ¼´óѧ¹ÜÀíѧԺÕÐÆ¸Éç»áÓù¤£¨¿ÆÑÐÖúÀí£©1Ãû
+1/6
ÉϺ£½»Í¨´óѧ»¯Ñ§»¯¹¤Ñ§ÔºÕÅÖÇÌοÎÌâ×é³ÏƸ²©Ê¿ºó
+1/1
snoopyzhao
ÖÁ×ðľ³æ (Ö°Òµ×÷¼Ò)
- ³ÌÐòÇ¿Ìû: 16
- Ó¦Öú: 157 (¸ßÖÐÉú)
- ¹ó±ö: 0.02
- ½ð±Ò: 18844.7
- Ìû×Ó: 3803
- ÔÚÏß: 1422.4Сʱ
- ³æºÅ: 183750
¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
dubo(½ð±Ò+1): »¶ÓÌÖÂÛ 2011-11-11 23:31:16
guojunhang(½ð±Ò+1): Õâ¸öÎÊÌâÎÒÒ²×¢Òâµ½ÁË£¬ËùÒÔ¸ÄÕýºóÁ˳ÌÐòÁ÷³Ì 2011-11-13 18:27:43
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
dubo(½ð±Ò+1): »¶ÓÌÖÂÛ 2011-11-11 23:31:16
guojunhang(½ð±Ò+1): Õâ¸öÎÊÌâÎÒÒ²×¢Òâµ½ÁË£¬ËùÒÔ¸ÄÕýºóÁ˳ÌÐòÁ÷³Ì 2011-11-13 18:27:43
| ÄãµÚÒ»¸ö³ÌÐòÖеÚÒ»¸ö return Ö±½Ó¾Í½áÊøÁËÄǸöº¯Êý£¬ºóÃæµÄÄǸöÌõ¼þÓÀÔ¶²»»á±»Ö´Ðа¡¡¡ |
2Â¥2011-11-11 22:53:36
maomao1210
½ð³æ (ÕýʽдÊÖ)
- ³ÌÐòÇ¿Ìû: 5
- Ó¦Öú: 2 (Ó×¶ùÔ°)
- ½ð±Ò: 1432.8
- Ìû×Ó: 991
- ÔÚÏß: 442.1Сʱ
- ³æºÅ: 253215
¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
jjdg(½ð±Ò+1): ¸Ðл²ÎÓë 2011-11-12 00:41:19
ÓàÔó³É: ר¼Ò¿¼ºË´æµµ 2011-11-13 21:35:24
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
jjdg(½ð±Ò+1): ¸Ðл²ÎÓë 2011-11-12 00:41:19
ÓàÔó³É: ר¼Ò¿¼ºË´æµµ 2011-11-13 21:35:24
|
Ã²ËÆ±äÁ¿¶¨ÒåÒ²ÓÐÎÊÌ⣬µÚÒ»¸öº¯ÊýÖÐÓõÄÊÇreal*8,Ö÷³ÌÐò¸øµÄÓÐʱºòÊÇreal*8 ,ÓÐʱºòÊÇreal*4 [ Last edited by maomao1210 on 2011-11-11 at 23:00 ] |
3Â¥2011-11-11 22:55:13
¡ï ¡ï ¡ï
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
jjdg(½ð±Ò+1): ¸Ðл²ÎÓë 2011-12-12 22:29:29
jjdg(½ð±Ò+1): ¸ÐлӦÖú 2011-12-13 00:49:52
Сľ³æ(½ð±Ò+0.5):¸ø¸öºì°ü£¬Ð»Ð»»ØÌû
jjdg(½ð±Ò+1): ¸Ðл²ÎÓë 2011-12-12 22:29:29
jjdg(½ð±Ò+1): ¸ÐлӦÖú 2011-12-13 00:49:52
| °ÑµÚÒ»¸öif¿éÖеÄreturnÈ¥µô |
4Â¥2011-12-12 14:57:58













»Ø¸´´ËÂ¥