0
已解决
李汉魁
中级光能
中级光能
https://nanti.jisuanke.com/t/14
请各位大佬说一下思路,谢谢!
0
1
高亮节
资深守护
资深守护
不要求时间的话:
从字母的末端判断就行了
首先,定义一个字符串和整型,读入字符串 pascal:
a:=0;
for b:=length(s) downto 1 do
begin
if s[b]='I' then a:=a+1;
if s[b]='V' then a:=a+5;
if s[b]='X' then a:=a+10;
if s[b]='L' then a:=a+50;
if s[b]='C' then a:=a+100;
if s[b]='D' then a:=a+500;
if s[b]='M' then a:=a+1000;
end;
输出a
就对了
0
0
0
0
0
翟谦瑞
新手守护
新手守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
何沐阳
资深守护
0