Pascal问题:进制转换.将一个四位十六进制的数转为十进制的数.
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/07/06 10:49:39
Pascal问题:进制转换.将一个四位十六进制的数转为十进制的数.
输入说明:一行,一个16进制数字(字母的大小写不限制,如F、f 带代表15)
输出说明:一行一个十进制数
输入样例:1A2B(1a2b)
输出样例:6699
输入说明:一行,一个16进制数字(字母的大小写不限制,如F、f 带代表15)
输出说明:一行一个十进制数
输入样例:1A2B(1a2b)
输出样例:6699
var s:string;
i,t:integer;
begin
readln(s);
t:=0;
for i:=1 to 4 do
if s[i]>='A' then t:=t*16+(ord(s[i])-ord('A')+10)
else t:=t*16+ord(s[i])-ord('0');
writeln(t);
end.
再问: 小写算进去了吗?
再答: 额,没有,你做个判断吧,分一下大小写
再问: 帮我列一下,我不会。
再答: for i:=1 to 4 do if s[i]>='a' then t:=t*16+(ord(s[i])-ord('a')+10) else if s[i]>='A' then t:=t*16+(ord(s[i])-ord('A')+10) else t:=t*16+ord(s[i])-ord('0');
i,t:integer;
begin
readln(s);
t:=0;
for i:=1 to 4 do
if s[i]>='A' then t:=t*16+(ord(s[i])-ord('A')+10)
else t:=t*16+ord(s[i])-ord('0');
writeln(t);
end.
再问: 小写算进去了吗?
再答: 额,没有,你做个判断吧,分一下大小写
再问: 帮我列一下,我不会。
再答: for i:=1 to 4 do if s[i]>='a' then t:=t*16+(ord(s[i])-ord('a')+10) else if s[i]>='A' then t:=t*16+(ord(s[i])-ord('A')+10) else t:=t*16+ord(s[i])-ord('0');
用c语言编写一个将十六进制数转换为十进制数的程序
将十进制数32.5转换成对应的二进制数、八进制数和十六进制数.
谁能把这个十六进制数转换成十进制的.
编写一汇编语言程序,要求从键盘接收一个四位的十六进制数,并在终端上显示与它等值的二进制数和十进制数
1:与十六进制数BB等值十进制数是多少.2:将原码表示的有符号二进制数11001101转换成十进制数是多少.
栈的简单应用:数制转换问题(将十进制数N转换为r进制的数) 将十进制数N转换为r进制的数,其转换方法利用
计算机的数值的计算将十进制数99、133、127、192、324分别转换为二进制 八进制 十六进制数、
十进制如何转换为十六进制.比如123等于多少十六进制的数
二进制八进制十进制十六进制数的计算
将十进制数30.25转换为32位的ieee形式的浮点数
用 Pascal 编写一个程序将十进制整数n转换为二进制数.
如何将十进制数28转换为32位的二进制数,求教