高考问答联合广场到深圳图书馆:完成pascal程序
来源：百度文库 编辑：高考问答 时间：2024/04/28 10:21:40
完成程序，输入一个3位数的整数（可正可负），输入时反向输出。如：输入-456，输出-654。
program name;
var three:integer;
begin
read(three);
(
)
end.
program name;
var three:integer;
begin
read(three);
(
)
end.
你太苛刻了吧``只允许用一个变量three，怎么完善啊??
要能多几个变量，才行 啊```
附：
program name;
var three,tmp,i:integer;
begin
read(three);
tmp:=0;
for i:=1 to 3 do
begin
tmp:=tmp*10+three mod 10;
three:=three div 10;
end;
writeln(tmp);
end.