Submission #1341904


Source Code Expand

var r,b,g,c:longint;
    s1,s2,s3,s:string;
//procedure mo;
//begin
//        assign(input,fi);
//        reset(input);
//        assign(output,fo);
//        rewrite(output);
//end;

procedure nhap;
begin
        readln(r,b,g);
        str(r,s1);
        str(b,s2);
        str(g,s3);
        s:=s1+s2+s3;
        val(s,c);
        if (c mod 4=0)  then
                writeln('YES')
        else
                writeln('NO');
end;

begin
       // mo;
        nhap;
end.

Submission Info

Submission Time
Task A - RGB Cards
User tin2016_nhminh
Language Pascal (FPC 2.6.2)
Score 100
Code Size 500 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 100 / 100
Status
AC × 2
AC × 7
Set Name Test Cases
Sample s1.txt, s2.txt
All in1.txt, in2.txt, in3.txt, in4.txt, in5.txt, s1.txt, s2.txt
Case Name Status Exec Time Memory
in1.txt AC 0 ms 128 KB
in2.txt AC 0 ms 128 KB
in3.txt AC 0 ms 128 KB
in4.txt AC 0 ms 128 KB
in5.txt AC 0 ms 128 KB
s1.txt AC 0 ms 128 KB
s2.txt AC 0 ms 128 KB