Submission #2923008
Source Code Expand
var max:real; x,y:array[0..110] of longint; i,j,n:longint; function s(i,j:longint):real; var ans:longint; begin ans:=sqr(x[i]-x[j])+sqr(y[i]-y[j]); exit(sqrt(ans)); end; begin readln(n); max:=0; for i:=1 to n do read(x[i],y[i]); for i:=1 to n do for j:=1 to n do if s(i,j)>max then max:=s(i,j); writeln(max:0:6); end.
Submission Info
Submission Time | |
---|---|
Task | A - 2点間距離の最大値 ( The longest distance ) |
User | luogu_bot4 |
Language | Pascal (FPC 2.6.2) |
Score | 100 |
Code Size | 381 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 | All | ||
---|---|---|---|
Score / Max Score | 100 / 100 | ||
Status |
|
Set Name | Test Cases |
---|---|
All | 00_max.txt, 00_sample_01.txt, 00_sample_02.txt, 00_sample_03.txt, 00_sample_04.txt, 00_sample_05.txt, 01_rnd_00.txt, 01_rnd_01.txt, 01_rnd_02.txt, 01_rnd_03.txt, 01_rnd_04.txt, 01_rnd_05.txt, 01_rnd_06.txt, 01_rnd_07.txt, 01_rnd_08.txt, 01_rnd_09.txt, 01_rnd_10.txt, 01_rnd_11.txt, 01_rnd_12.txt, 01_rnd_13.txt, 01_rnd_14.txt, 01_rnd_15.txt, 01_rnd_16.txt, 01_rnd_17.txt, 01_rnd_18.txt, 01_rnd_19.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
00_max.txt | AC | 0 ms | 128 KB |
00_sample_01.txt | AC | 0 ms | 128 KB |
00_sample_02.txt | AC | 0 ms | 128 KB |
00_sample_03.txt | AC | 0 ms | 128 KB |
00_sample_04.txt | AC | 0 ms | 128 KB |
00_sample_05.txt | AC | 0 ms | 128 KB |
01_rnd_00.txt | AC | 0 ms | 128 KB |
01_rnd_01.txt | AC | 0 ms | 128 KB |
01_rnd_02.txt | AC | 0 ms | 128 KB |
01_rnd_03.txt | AC | 0 ms | 128 KB |
01_rnd_04.txt | AC | 0 ms | 128 KB |
01_rnd_05.txt | AC | 0 ms | 128 KB |
01_rnd_06.txt | AC | 0 ms | 128 KB |
01_rnd_07.txt | AC | 0 ms | 128 KB |
01_rnd_08.txt | AC | 0 ms | 128 KB |
01_rnd_09.txt | AC | 0 ms | 128 KB |
01_rnd_10.txt | AC | 0 ms | 128 KB |
01_rnd_11.txt | AC | 0 ms | 128 KB |
01_rnd_12.txt | AC | 0 ms | 128 KB |
01_rnd_13.txt | AC | 0 ms | 128 KB |
01_rnd_14.txt | AC | 0 ms | 128 KB |
01_rnd_15.txt | AC | 0 ms | 128 KB |
01_rnd_16.txt | AC | 0 ms | 128 KB |
01_rnd_17.txt | AC | 0 ms | 128 KB |
01_rnd_18.txt | AC | 0 ms | 128 KB |
01_rnd_19.txt | AC | 0 ms | 128 KB |