#10026: 为什么ole


xujieyi2003 (华二 徐介已)

學校 : 上海市娄山中学
編號 : 50360
來源 : [58.37.83.0]
最後登入時間 :
2016-11-02 20:06:43
d070. 格瑞哥里的煩惱 (0 尾版) -- 板橋高中教學題 | From: [61.170.133.133] | 發表日期 : 2015-07-11 13:50

var
  y:int64;
begin
while not eof do begin
    readln(y);
    if ((y mod 4=0) and (y mod 100<>0)) or (y mod 400=0)
    then writeln('a leap year')
    else writeln('a normal year');
    end;
end.

 
#10031: Re:为什么ole


asas (向諸神與地雷醬獻上祈禱)

學校 : 不指定學校
編號 : 5185
來源 : [36.228.104.72]
最後登入時間 :
2024-03-06 23:29:54
d070. 格瑞哥里的煩惱 (0 尾版) -- 板橋高中教學題 | From: [140.137.132.76] | 發表日期 : 2015-07-12 23:58

var
  y:int64;
begin
while not eof do begin
    readln(y);
    if ((y mod 4=0) and (y mod 100<>0)) or (y mod 400=0)
    then writeln('a leap year')
    else writeln('a normal year');
    end;
end.

題目中的輸入說明有提到 "輸入的最後一行有一個 0,代表輸入的結束,這個數字請勿做任何處理。",你的程式可以試試看輸入零的結果會如何。


 
ZeroJudge Forum