作业帮用pascal语言：输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如：输入213,重输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如：输入213,重
来源：学生作业帮助网 编辑：作业帮 时间：2024/11/20 23:33:27
用pascal语言：输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如：输入213,重输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如：输入213,重
用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,重输入一个三位数的整数,将数字位置重新排列,组成一个尽可大的三位数.例如：输入213,重
第四个if那行末尾是)而不是>
在错误信息那里有提示错误发生在(14,2)即第14行第2位,在附近（不一定一定在那里）找找就能发现