- 积分
- 68
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2015-4-9
- 最后登录
- 1970-1-1
![[小起--戚婷婷] 粉丝数:225 微博数:911 新浪微博达人勋](source/plugin/sina_login/img/light.png)
|
![](static/image/common//ico_lz.png)
楼主 |
发表于 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
|
-
题目
-
程序错误
|