早教吧作业答案频道 -->其他-->
pascal编程题目描述给定一个整数,请将该数各个位上数字反转得到一个新数。新数也应满足整数的常见形式,即除非给定的原数为零,否则反转后得到的新数的最高位数字不应为零(参
题目详情
pascal编程
题目描述
给定一个整数,请将该数各个位上数字反转得到一个新数。新数也应满足整数的常见形式,即除非给定的原数为零,否则反转后得到的新数的最高位数字不应为零(参见样例2)。
输入格式
输入文件名为reverse.in 。
输入共1 行,一个整数 N。
输出格式
输出文件名为reverse.out 。
输出共1行,一个整数,表示反转后的新数。
样例输入
【样例输入1】
123
【样例输入2】
-380
样例输出
【样例输出1】
321
【样例输出2】
-83
注释
数据范围
-1,000,000,000≤ N≤ 1,000,000,000 。
题目描述
给定一个整数,请将该数各个位上数字反转得到一个新数。新数也应满足整数的常见形式,即除非给定的原数为零,否则反转后得到的新数的最高位数字不应为零(参见样例2)。
输入格式
输入文件名为reverse.in 。
输入共1 行,一个整数 N。
输出格式
输出文件名为reverse.out 。
输出共1行,一个整数,表示反转后的新数。
样例输入
【样例输入1】
123
【样例输入2】
-380
样例输出
【样例输出1】
321
【样例输出2】
-83
注释
数据范围
-1,000,000,000≤ N≤ 1,000,000,000 。
▼优质解答
答案和解析
var
st:string;
t:char;
flag:boolean;
len,i:longint;
begin
readln(st);
if st[1] = '-' then
begin
flag:=true;
delete(st,1,1);
end
else flag := false;
len := length(st);
for i := 1 to len div 2 do
begin
t := st[i];
st[i] := st[len - i + 1];
st[len - i + 1] := t;
end;
while (st[1] = '0') and (length(st) > 1) do delete(st,1,1);
if flag then st := '-' + st;
writeln(st);
end.
st:string;
t:char;
flag:boolean;
len,i:longint;
begin
readln(st);
if st[1] = '-' then
begin
flag:=true;
delete(st,1,1);
end
else flag := false;
len := length(st);
for i := 1 to len div 2 do
begin
t := st[i];
st[i] := st[len - i + 1];
st[len - i + 1] := t;
end;
while (st[1] = '0') and (length(st) > 1) do delete(st,1,1);
if flag then st := '-' + st;
writeln(st);
end.
看了pascal编程题目描述给定一...的网友还看了以下:
新定义运算:1×2=2!,1×2×3=3!,1×2×3×4=4!,那么下面各个乘积的末尾各有多少个 2020-04-27 …
一道数学题一个车工在使用新车刀后,每小时可比原来每小时多车8个零件,7小时车的零件比原来8小时车的 2020-06-15 …
.第一车间每周生产零件630个,第二车间每周生产零件780个,我们是老客户,每周要先满足我们100 2020-07-09 …
一个二进制整数右边加一个零,新数是原数的2倍,两个零是4倍.请问这是怎么推出来的 2020-11-18 …
问一道数学题(高分50哦)甲乙做零件,甲做的零件的二分之一的数量等于乙做的零件的五分之二,甲乙共做3 2020-11-25 …
回答正确的给分有160个机器零件,平均分给甲乙2个车间加工,乙车间比甲车间迟3小时开工,所以比甲车间 2020-12-01 …
1某机械厂加工一批零件甲车间加工这批零件的20%乙车间加工余下的25%丙车间加工余下的40%还剩36 2020-12-03 …
1某机械厂加工一批零件甲车间加工这批零件的20%乙车间加工余下的25%丙车间加工余下的40%还剩36 2020-12-22 …
数学题如何写甲乙两师傅共做零件135个,如果从甲做的零件中拿36个给乙,而又从乙做的零件中拿45个给 2020-12-26 …
求问pro/e导入adams后该怎么做,共有两个零件,导入后我给他们添加零件,然后添加了一个共有两个 2020-12-26 …