Submission #3015268

Source Code Expand

var
 a,b,i,s:longint;
begin
 readln(a,b);
 for i:=a to b do
  if (i mod 4=0) and (i mod 100<>0) or (i mod 400=0) then inc(s);
 writeln(s);
end.

Submission Info

Submission Time
Task C - 2月29日
User luogu_bot4
Language Pascal (FPC 2.6.2)
Score 25
Code Size 150 Byte
Status TLE
Exec Time 2103 ms
Memory 128 KB

Compile Error

/usr/bin/ld.bfd: warning: ./link.res contains output sections; did you forget -T?

Judge Result

Set Name sub All
Score / Max Score 25 / 25 0 / 75
Status
AC × 10
AC × 15
TLE × 7
Set Name Test Cases
sub test_01A.txt, test_02A.txt, test_03A.txt, test_04A.txt, test_05A.txt, test_07A.txt, test_09A.txt, test_11A.txt, test_13A.txt, test_15A.txt
All sample_01.txt, sample_02.txt, sample_03.txt, test_01A.txt, test_02A.txt, test_03A.txt, test_04A.txt, test_05A.txt, test_06.txt, test_07A.txt, test_08.txt, test_09A.txt, test_10.txt, test_11A.txt, test_12.txt, test_13A.txt, test_14.txt, test_15A.txt, test_16.txt, sample_01.txt, sample_02.txt, sample_03.txt
Case Name Status Exec Time Memory
sample_01.txt AC 0 ms 128 KB
sample_02.txt AC 0 ms 128 KB
sample_03.txt TLE 2103 ms 128 KB
test_01A.txt AC 0 ms 128 KB
test_02A.txt AC 0 ms 128 KB
test_03A.txt AC 0 ms 128 KB
test_04A.txt AC 0 ms 128 KB
test_05A.txt AC 0 ms 128 KB
test_06.txt TLE 2103 ms 128 KB
test_07A.txt AC 0 ms 128 KB
test_08.txt TLE 2103 ms 128 KB
test_09A.txt AC 0 ms 128 KB
test_10.txt TLE 2103 ms 128 KB
test_11A.txt AC 0 ms 128 KB
test_12.txt TLE 2103 ms 128 KB
test_13A.txt AC 0 ms 128 KB
test_14.txt AC 1228 ms 128 KB
test_15A.txt AC 0 ms 128 KB
test_16.txt TLE 2103 ms 128 KB