Question

fortran中有关write的用法

program main
implicit none
real :: r, s
real(8), parameter :: pi=3.14

write(*,*) "Please input r:"
read(*,*) r
s = pi * r * r
write(*,"(' 面积='F8.3)") s
stop
end

我想问的是单引号引住的 ' 面积= ' 为什么会出现在那里？它对后面输出的数值没有影响么？而且我发现我把引号引住的内容改为 ' S= ' 就没有办法输出 S= 了，为什么呀？
各位大神我是刚学fortran~~~帮忙解答呀~~~

Answer 1

1、write的基本意思是“写”，指用笔大方、庄重地记录一些东西。引申可表示“写信”，是日常用语。

2、write既可用作及物动词，也可用作不及物动词。用作及物动词时，可接名词、代词、动词不定式、动名词、that/wh-从句作宾语，也可接双宾语，其间接宾语可以转化为介词to的宾语，其直接宾语可以由名词充当，也可由that从句充当。

3、write还可接由名词、动词不定式充当补足语的复合宾语。

4、write可用于现在完成时，也可用于现在完成进行时，用于前者时必须接宾语，用于后者时可不接宾语。

5、write的过去分词written可用作形容词，在句中作定语。

扩展资料

近义词：copy

读音：英 [ˈkɒpi]   美 [ˈkɑːpi] 

释义：抄写，誊写，模仿。

语法：copy作“抄写”解时，可用作及物动词或不及物动词。用作及物动词时，可接word，letter等名词作宾语，也可接以形容词充当补足语的复合宾语。copy作“模仿，仿效”解时，只用作及物动词，可指模仿人物的行为、思想或穿着打扮等。

例句：

It all started when she asked me if she could copy my homework. 

这一切起因于当她问我她是否可以抄写我的家庭作业开始的时候。

Answer 2

Fortran 语言中的函数 write 函数中有两个参数，即
write(*,*) i,j,k
上面的参数中，第一个 ‘*’ 表示输出到标准输出，即命名行中，这是默认选项，而第二个参数 '*'
表示默认的输出格式，即默认的 real格式(变量s的声明)。这个参数可以使用 format 函数。
你的第二个 write 函数的第二个参数为 "(' 面积='F8.3)" ，表示按照下面的格式输出(r=1):
面积= 3.140
若把‘面积‘二字改为字母 ‘S’，则输出： S= 3.140
write 函数的两个参数还可以是数字。比如把结果输出到文件中：
open = (10,file ='output.dat');
write(10,20) i,j,k ! 把结果输出到文件output.dat中
20 format( ' 面积='F8.3)
就可以了。

我最近也在自学Fortran 语言。大家共勉啊！

追问

帮帮忙再看一下这个~~为什么输出来的是错误的呀