- 积分
- 68
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2015-4-9
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2015-4-16 18:42:23
|
显示全部楼层
我可以再问个问题吗?是关于if语句的。
编写的程序为:
program ex2
implicit none
integer age
real shuijin ,gongzi
write(*,*)"输入年龄age:"
read(*,*)age
write(*,*)"输入工资gognzi:"
read(*,*)gongzi,
if(age<=50)then
if(gongzi>5000)then
shuijin=gongzi*0.15
write(*,*)gongzi
else if(gongzi<=5000.and.gongzi>=1000)then
shuijin=gongzi*0.1
write(*,*)shuijin
else if(gongzi<1000)then
shuijin=0.03*gongzi
write(*,*)shuijin
end if
else
if(gongzi>5000)then
shuijin=gongzi*0.1
write(*,*)gongzi
else if(gongzi<=5000.and.gongzi>=1000)then
shuijin=gongzi*0.07
write(*,*)shuijin
else if(gongzi<1000)then
shuijin=0.05*gongzi
write(*,*)shuijin
end if
end if
stop
end
|
-
题目
-
程序错误
|