求助，询问第五行错误怎么改

URMYH

[Fortran] 纯文本查看 复制代码

查看代码

打印?

1	program calculate_e

2	implicit none !

3	integer(kind=4)::M

4	character(LEN=3):: D,P,R

5	M=Log(P)-log(P-D*R)/log(1+R)

6	writer(*,*)‘M=’，M

7	end program

||=== Build: Debug in test310 (compiler: GNU Fortran Compiler) ===|
C:\Users\陈政\test310\main.f95|6|Error: Syntax error in WRITE statement  |
C:\Users\陈政\test310\main.f95|5|Error: Operands of binary numeric operator '+'  are INTEGER(4)/CHARACTER(1)|
||=== Build failed: 2 error(s), 0 warning(s) (0 minute(s), 0 second(s)) ===|

布衣龙共

[Fortran] 纯文本查看 复制代码

查看代码

打印?

1	program calculate_e

2	implicit none !

3

real :: M

4	real :: D = 2.0 ,P = 30.0 , R = 4.0

5	M=Log(P)-log(P-D*R)/log(1+R)

6	write(*,*) "M=", M

7	end program

URMYH

谢谢哥，问一下，不用character去设置变量吗

URMYH

program main
  implicit none
real:: C
real::F=10.0
C=5/9(F-32)
write(*,*)"C=",C
end
为什么换个数据就不行了呢

URMYH

谢谢大佬

布衣龙共

C=5.0/9.0*(F-32)

character是字符串变量，字符串不能直接参与计算。
5 对 Fortran来说，是整数。所以 5/9 等于 0，想要浮点数的 5，请写成 5.0

此外，乘号不能忽略。

URMYH

哪这个能帮忙看看吗，我按照你之前教我的写的

[Fortran] 纯文本查看 复制代码

查看代码

打印?

1	program main

2	implicit none

3	real::x=1.0,y=3.0,z=5.0,m=-6,n=4,k=3

4

real::S

5	S=max((m*k).(mod(m-1,n))*4)

6	write(*,*)"S=",S

7

end

URMYH

也是要浮点数吗

布衣龙共

S=max(         (m*k)      ,     (mod(m-1,n))*4            )
max函数有两个参数 (m*k) 和  (mod(m-1,n))*4 ，函数参数和参数之间，用逗号，而不是小数点。

URMYH

谢谢哥，爱了爱了