2020年4月20日
循环结构1
摘要： program ex1 implicit none integer i real sum,tave,t,tmax sum=0.0 tmax=0.0 do i=1,7 read*,t sum=t+sum if(t>tmax) then tamx=t end if end do tave=sum/7 p 阅读全文
posted @ 2020-04-20 10:29 李欣玲 阅读(273) 评论(0) 推荐(0) 编辑