作业帮 > 综合 > 作业

用pascal语言:输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如:输入213,重

来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/06/25 13:08:20
用pascal语言:输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如:输入213,重
输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如:输入213,重新排列可得到尽可能大的三位数是321.
program lx_3_2;
var
a,b,c,x:integer;
begin
write('Please input the number');
readln(x);
a:=x div 100;
b:=(x mod 100)div 10;
c:=x mod 10;
if(a>=b)and(b>=c)then writeln(a,b,c);
if(a>=c)and(c>=b)then writeln(a,c,b);
if(b>=a)and(a>=c)then writeln(b,a,c);
if(b>=c)and(c>=a)then writeln(b,c,a>;
if(c>=a)and(a>=b)then writeln(c,a,b);
if(c>=b)and(b>=a)then writeln(a,b,a);
readln;
end.
这是我编的,我才初学,可是哪里错了?他说有错,我找来找去找不到.他的错误信息是语法错误,(14,2)fatal:语法错误,//太长了不打了//“)”expected but
if found
用pascal语言:输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如:输入213,重
第四个if那行末尾是)而不是>
在错误信息那里有提示错误发生在(14,2)即第14行第2位,在附近(不一定一定在那里)找找就能发现