Submission #1114811


Source Code Expand

program j01;
var n,m,ans:int64;
begin
  readln(n,m);
  if 2*n>=m then
  begin
    writeln(m div 2);halt;
  end;
  ans:=n;m:=m-2*n;
  ans:=ans+m div 4;
  writeln(ans);
end.

Submission Info

Submission Time
Task C - Scc Puzzle
User oldjang
Language Pascal (FPC 2.6.2)
Score 300
Code Size 182 Byte
Status AC
Exec Time 0 ms
Memory 128 KB

Compile Error

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

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 300 / 300
Status
AC × 2
AC × 9
Set Name Test Cases
Sample 00_example_01.txt, 00_example_02.txt
All 00_example_01.txt, 00_example_02.txt, 01.txt, 02.txt, 03.txt, 04.txt, 05.txt, 06.txt, 07.txt
Case Name Status Exec Time Memory
00_example_01.txt AC 0 ms 128 KB
00_example_02.txt AC 0 ms 128 KB
01.txt AC 0 ms 128 KB
02.txt AC 0 ms 128 KB
03.txt AC 0 ms 128 KB
04.txt AC 0 ms 128 KB
05.txt AC 0 ms 128 KB
06.txt AC 0 ms 128 KB
07.txt AC 0 ms 128 KB