Submission #1772365
Source Code Expand
program Project1; {$APPTYPE CONSOLE} uses SysUtils; var n,i,a,b,k,j:Integer; p:array of Integer; saitan:Boolean; begin try { TODO -oUser -cConsole Main : ここにコードを記述してください } Readln(n); Read(a); Readln(b); Readln(k); SetLength(p,k+2); for i := 0 to k - 1 do begin Read(p[i]); end; p[k]:=a; p[k+1]:=b; saitan:=True; for i := 0 to k+1 do begin for j := i to k+1 do begin if (p[i]=p[j])and(i<>j) then saitan:=False; end; end; if saitan then Writeln('YES') else Writeln('NO'); Readln; except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; end.
Submission Info
Submission Time | |
---|---|
Task | B - 嘘つきの高橋くん |
User | nmoxya |
Language | Pascal (FPC 2.6.2) |
Score | 100 |
Code Size | 766 Byte |
Status | AC |
Exec Time | 1 ms |
Memory | 256 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 |
|
|
Set Name | Test Cases |
---|---|
Sample | subtask0_sample_01.txt, subtask0_sample_02.txt, subtask0_sample_03.txt, subtask0_sample_04.txt, subtask0_sample_05.txt |
All | subtask0_sample_01.txt, subtask0_sample_02.txt, subtask0_sample_03.txt, subtask0_sample_04.txt, subtask0_sample_05.txt, subtask1_01.txt, subtask1_02.txt, subtask1_03.txt, subtask1_04.txt, subtask1_05.txt, subtask1_06.txt, subtask1_07.txt, subtask1_08.txt, subtask1_09.txt, subtask1_10.txt, subtask1_11.txt, subtask1_12.txt, subtask1_13.txt, subtask1_14.txt, subtask1_15.txt, subtask1_16.txt, subtask1_17.txt, subtask1_18.txt, subtask1_19.txt, subtask1_20.txt, subtask1_21.txt, subtask1_22.txt, subtask1_23.txt, subtask1_24.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
subtask0_sample_01.txt | AC | 0 ms | 128 KB |
subtask0_sample_02.txt | AC | 0 ms | 128 KB |
subtask0_sample_03.txt | AC | 0 ms | 128 KB |
subtask0_sample_04.txt | AC | 0 ms | 128 KB |
subtask0_sample_05.txt | AC | 0 ms | 256 KB |
subtask1_01.txt | AC | 0 ms | 256 KB |
subtask1_02.txt | AC | 0 ms | 256 KB |
subtask1_03.txt | AC | 0 ms | 256 KB |
subtask1_04.txt | AC | 0 ms | 128 KB |
subtask1_05.txt | AC | 1 ms | 256 KB |
subtask1_06.txt | AC | 1 ms | 256 KB |
subtask1_07.txt | AC | 0 ms | 256 KB |
subtask1_08.txt | AC | 0 ms | 256 KB |
subtask1_09.txt | AC | 1 ms | 256 KB |
subtask1_10.txt | AC | 1 ms | 256 KB |
subtask1_11.txt | AC | 1 ms | 256 KB |
subtask1_12.txt | AC | 0 ms | 128 KB |
subtask1_13.txt | AC | 0 ms | 128 KB |
subtask1_14.txt | AC | 0 ms | 128 KB |
subtask1_15.txt | AC | 0 ms | 128 KB |
subtask1_16.txt | AC | 0 ms | 256 KB |
subtask1_17.txt | AC | 0 ms | 256 KB |
subtask1_18.txt | AC | 1 ms | 256 KB |
subtask1_19.txt | AC | 0 ms | 256 KB |
subtask1_20.txt | AC | 1 ms | 256 KB |
subtask1_21.txt | AC | 0 ms | 256 KB |
subtask1_22.txt | AC | 0 ms | 256 KB |
subtask1_23.txt | AC | 0 ms | 256 KB |
subtask1_24.txt | AC | 0 ms | 256 KB |