發表新討論
#8914: 为何错


lsxujie (许洁)

學校 : 上海市娄山中学
編號 : 40597
來源 : [222.66.36.252]
最後登入時間 ：
2016-05-20 15:34:29
a307. NOIP2011 1.数字反转 -- NOIP2011普及组第一题 | From: [222.66.36.254] | 發表日期 : 2014-06-27 14:46
var
  n,ans:longint;
begin
  readln(n);
  ans:=0;
  while (n*-1>0) or (n>0) do begin
    ans:=ans*10+n mod 10;
    n:=n div 10;
  end;
  writeln(ans);
  readln;
end.
 
#10087: Re:为何错


xujieyi2003 (华二 徐介已)

學校 : 上海市娄山中学
編號 : 50360
來源 : [58.37.83.0]
最後登入時間 ：
2016-11-02 20:06:43
a307. NOIP2011 1.数字反转 -- NOIP2011普及组第一题 | From: [61.170.133.133] | 發表日期 : 2015-07-26 18:09
AC
var
  n,ans:longint;
begin
  readln(n);
  ans:=0;
  while (n*-1<>0) or (n<>0) do begin
    ans:=ans*10+n mod 10;
    n:=n div 10;
  end;
  writeln(ans);
  readln;
end.


 
ZeroJudge Forum