13问答网 > 100财富值求fortran95程序！具体要求是，给a到z赋值0到25，空格赋值26，用户可以输入

100财富值求fortran95程序！具体要求是，给a到z赋值0到25，空格赋值26，用户可以输入

2025-03-10 04:34:02

推荐回答（1个）

回答1：

这显然是一个26进制数向10进制转化的题目。用pascal吧！ fortran处理字符串或者字符性能较弱 ！
{$n+e-}
var
	s:string;
	n:integer;
	a:array[0..100] of integer;
	i,j:integer;
	sum:extended;
begin
	s:='zzzzzzzzz';
	n:=length(s);
	for i:=1 to n do begin
		a[i]:=ord(s[i])-ord('a');
	end;
	sum:=0.0;
	for i:=1 to n do begin
		sum:=sum*26+a[i];
	end;
	writeln(sum);
end.