Question

100财富值求fortran 95程序，具体是10进制的数值转换成26进制的字符串，然后输出到屏幕

100财富值求fortran 95程序，具体是10进制的数值转换成26进制的字符串，然后输出到屏幕。举例来说，输入10进制数值2398，程序对其26进制展开值是3，14，6，所以输出“dog”
注意，是fortran95程序，不是C，不是C，不是C！（重要事项重复说三遍）

Answer 1

	dimension bb(32)
	character*1 bb
	integer k,i,b,cc
	cc=2398
	b=26
	k=1
10	i=mod(cc,b)
	bb(k)=char(i+ichar('a'))
	cc=int(cc/b)
	if (cc.gt.0) then
		k=k+1
		goto 10
	endif
	write(*,*)(bb(i),i=k,1,-1)
	stop
	end