²é¿´: 1694  |  »Ø¸´: 10

superstat54

ľ³æ (СÓÐÃûÆø)

[ÇóÖú] Fortran Ôõô°Ñ×Ö·û´®×ª»»Îª±í´ïʽ

±ÈÈç´ÓÎļþÖжÁÈëÕâÑùÒ»´®×Ö·û "100 + x*x"¸´ÖƸøa£¬"sin(x)"¸³Öµ¸øb£¬Èç¹û³ÌÐòÖÐx=0.5£¬ÔõôÔÚ³ÌÐòÖаÑÕâÒ»´®×Ö·û"a + b"ת»»Îª±í´ïʽ100 + x*x + sin(x) £¬²¢Çó³öÆäÖµ?
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

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

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

lurencyj

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

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

¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
jjdg: ½ð±Ò+1, ¸Ðл²ÎÓë 2012-03-21 01:43:17
¿ÉÒÔÓÃuseÓï¾äÊÔÊÔ¡£¡£¡£
ºÜÅ®×Ӻܹ­Ëä´ó
2Â¥2012-03-19 21:34:52
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

superstat54

ľ³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
2Â¥: Originally posted by lurencyj at 2012-03-19 21:34:52:
¿ÉÒÔÓÃuseÓï¾äÊÔÊÔ¡£¡£¡£

ÄÜ·ñдµÄÏêϸЩ£¿Ð»Ð»£¡
3Â¥2012-03-19 21:38:46
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lurencyj

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

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

¡ï
jjdg: ½ð±Ò+1, ¸Ðл²ÎÓë 2012-03-21 01:43:23
The USE statement has the syntax

       USE environment-name,filename
where filename is optional, and is a character-valued expression. It causes the text of the named environment to be, in effect, placed in the program at the point where the USE statement was encountered, and the programs whose object code is in the environment to be callable from the program in which the USE statement is found, as well as (less usefully) from any other programs loaded into memory at the same time.

In some implementations, because ENVIRONMENTs are incompatible with the available linkage loading mechanisms, the filename may be compulsory the first time a USE statement referring to environments in a given file is encountered, but not in subroutines, even externally compiled subroutines, later in the source stream.
ºÜÅ®×Ӻܹ­Ëä´ó
4Â¥2012-03-19 21:41:09
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

superstat54

ľ³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
4Â¥: Originally posted by lurencyj at 2012-03-19 21:41:09:
The USE statement has the syntax

       USE environment-name,filename
where filename is optional, and is a character-valued expression. It causes the text of the named environment to be, in eff ...

Âé·³±àдһ¶Î¼òµ¥Fortran´úÂëʾÀýһϡ­¡­
5Â¥2012-03-19 21:50:35
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

lurencyj

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

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

¡ï ¡ï
superstat54: ½ð±Ò+1, ¡ïÓаïÖú, лл£¡ 2012-03-19 21:57:26
jjdg: ½ð±Ò+1, ¸Ðл²ÎÓë 2012-03-21 01:43:31
Ã²ËÆ²»Ò»Ñù£¬useÊÇÄ£¿é»¯ÃæÏò¶ÔÏóµÄ¡£

sorry
ºÜÅ®×Ӻܹ­Ëä´ó
6Â¥2012-03-19 21:53:48
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÂíÓÀÌεijæ

гæ (СÓÐÃûÆø)

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

¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
jjdg: ½ð±Ò+1, ¸Ðл²ÎÓë 2012-03-21 01:43:37
¿ÉÒÔÖ±½Ó¶Á°¡£º
        read(2,999)line
        write(20,999)line
        enddo
999   format(a)
       È»ºó¸³Öµ¾ÍÐÐÁË
      a=100 + x*x
      b=sin£¨x£©
ÔÙ¸øX¸³Öµ£¬Çóa+b
7Â¥2012-03-20 14:27:28
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

superstat54

ľ³æ (СÓÐÃûÆø)

ÒýÓûØÌû:
7Â¥: Originally posted by ÂíÓÀÌεijæ at 2012-03-20 14:27:28:
¿ÉÒÔÖ±½Ó¶Á°¡£º
        read(2,999)line
        write(20,999)line
        enddo
999   format(a)
       È»ºó¸³Öµ¾ÍÐÐÁË
      a=100 + x*x
      b=sin£¨x£©
ÔÙ¸øX¸³Öµ£¬Çóa+b

read(2, 999) line
lineÊÇ×Ö·ûÐÍÂð£¿
a = 100 + x*x
b = sin(x)
ÊÇÔõô»ØÊ£¿a,bÊÇ×Ö·ûÐͱäÁ¿»¹ÊÇʵÊýÐÍ£¿
8Â¥2012-03-20 15:33:17
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÈñÀûµÄË鯬

ľ³æ (ÕýʽдÊÖ)

star watcher

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

¡ï ¡ï ¡ï
¸Ðл²ÎÓ룬ӦÖúÖ¸Êý +1
jjdg: ½ð±Ò+1, ¸Ðл²ÎÓë 2012-03-21 01:43:43
superstat54: ½ð±Ò+2, ÌṩһÖÖ½â¾öÎÊÌâµÄ˼·£¬Ð»Ð»£¡²»¹ý¾ÍÌ«Âé·³ÁË¡£ 2012-03-21 21:19:54
Ò»¸ö°ì·¨£¬ÓÃyaccºÍbison²úÉúCÓïÑÔµÄparser£¬È»ºóÓÃfortranµ÷Óᣲ»¹ýÎÒ¾õµÃû±ØÒª¸ãÕâôÂé·³£¬Èç¹û²»ÊǼÆËãÁ¿ºÜ´ó£¬ÓÃpython£¬matlabµÄeval¾Í¼òµ¥¶àÁË¡£
9Â¥2012-03-20 18:33:57
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÂíÓÀÌεijæ

гæ (СÓÐÃûÆø)

¡ï
jjdg: ½ð±Ò+1, ¸Ðл²ÎÓë 2012-03-21 01:43:49
ÒýÓûØÌû:
7Â¥: Originally posted by ÂíÓÀÌεijæ at 2012-03-20 14:27:28:
¿ÉÒÔÖ±½Ó¶Á°¡£º
        read(2,999)line
        write(20,999)line
        enddo
999   format(a)
       È»ºó¸³Öµ¾ÍÐÐÁË
      a=100 + x*x
      b=sin£¨x£©
ÔÙ¸øX¸³Öµ£¬Çóa+b

line ÊǶÁÄÇÒ»ÐУ¬¾ÍÊÇÄãÒªµÄ×Ö·ûÐͱäÁ¿ÔÚµÄÄÇÒ»ÐС£aºÍbµÄÀàÐÍÊÇʵÐÍ£¬µ«ÒªÄãÔÚÇ°ÃæÉùÃ÷¡£
10Â¥2012-03-20 21:09:09
ÒÑÔÄ   »Ø¸´´ËÂ¥   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ superstat54 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] 0703 ÎïÀí»¯Ñ§µ÷¼Á +3 ÎÒ¿ÉÒÔÉϰ¶µÄ¶Ô 2026-03-13 3/150 2026-03-15 17:32 by СÎïÀí»¯Ñ§
[¿¼ÑÐ] 274Çóµ÷¼Á +4 ʱ¼äµã 2026-03-13 4/200 2026-03-15 15:29 by Rambo13
[¿¼ÑÐ] 268Çóµ÷¼Á +5 Ò»¶¨ÓÐѧÉÏ- 2026-03-14 6/300 2026-03-14 22:20 by ÔËÆøyunqi
[¿¼ÑÐ] 283Çóµ÷¼Á +6 С¥¡£ 2026-03-12 9/450 2026-03-14 22:15 by cfxczx2015
[¿¼ÑÐ] 279Çóµ÷¼Á +3 ×¥×ÅÐÇÐǵÄÅ®º¢ 2026-03-10 3/150 2026-03-13 23:47 by userper
[¿¼ÑÐ] 285 Çóµ÷¼Á ×ÊÔ´Óë»·¾³ Ò»Ö¾Ô¸±±¾©»¯¹¤´óѧ +3 δÃû¿¼Éú 2026-03-10 3/150 2026-03-13 23:04 by JourneyLucky
[¿¼ÑÐ] 279Çóµ÷¼Á +3 Dizzy123@ 2026-03-10 3/150 2026-03-13 23:02 by JourneyLucky
[¿¼ÑÐ] 285»¯¹¤Ñ§Ë¶Çóµ÷¼Á£¨081700£© +6 ²ñ¿¤Ã¨_ 2026-03-12 6/300 2026-03-13 20:46 by hmn_wj
[¿¼ÑÐ] 311Çóµ÷¼Á +3 ¶¬Ê®Èý 2026-03-13 3/150 2026-03-13 20:41 by JourneyLucky
[¿¼ÑÐ] ¡¾¿¼Ñе÷¼ÁÇóÊÕÁô¡¿ +3 Ceciilia 2026-03-11 3/150 2026-03-13 20:18 by JourneyLucky
[¿¼ÑÐ] Çóµ÷¼Á +5 Ò»¶¨ÓÐѧÉÏ- 2026-03-12 5/250 2026-03-13 18:31 by ms629
[¿¼ÑÐ] ¡¾0856¡¿»¯Ñ§¹¤³Ì£¨085602£©313 ·Ö£¬±¾¿ÆÑ§¿ÆÆÀ¹ÀAÀàԺУ»¯Ñ§¹¤³ÌÓ빤ÒÕ£¬³ÏÇóµ÷¼Á +7 СÁõ¿ì¿ìÉϰ¶ 2026-03-11 7/350 2026-03-13 16:06 by ruiyingmiao
[¿¼ÑÐ] Ò»Ö¾Ô¸211»¯Ñ§Ñ§Ë¶310·ÖÇóµ÷¼Á +8 ŬÁ¦·Ü¶·112 2026-03-12 9/450 2026-03-13 15:41 by JourneyLucky
[¿¼ÑÐ] 289Çóµ÷¼Á +3 ÀîÕþÓ¨ 2026-03-12 3/150 2026-03-13 11:02 by Çóµ÷¼Ázz
[¿¼ÑÐ] 070303Ò»Ö¾Ô¸Î÷±±´óѧѧ˶310ÕÒµ÷¼Á +3 dÈçÔ¸Éϰ¶ 2026-03-12 5/250 2026-03-13 10:56 by houyaoxu
[¿¼ÑÐ] 274Çóµ÷¼Á0856²ÄÁÏ»¯¹¤ +12 z2839474511 2026-03-11 13/650 2026-03-13 10:39 by peike
[¿¼²©] 26¶Á²© +4 Rui135246 2026-03-12 10/500 2026-03-13 07:15 by gaobiao
[¿¼²©] 2026Ä격ʿÉêÇë +3 QwQwQW10 2026-03-11 3/150 2026-03-12 17:58 by gxch43
[¿¼ÑÐ] Ò»Ö¾Ô¸½­ÄÏ´óѧ085701»·¾³¹¤³Ìר˶×Ü·Ö287Çóµ÷¼Á +5 18266118446 2026-03-09 5/250 2026-03-11 16:51 by 2020015
[¿¼ÑÐ] 290Çóµ÷¼Á +3 ¿Â»´È» 2026-03-10 8/400 2026-03-11 13:48 by ¿Â»´È»
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û