Submission #1569292

---

Source Code Expand

import strutils
import sequtils

let NS1S2=readLine(stdin).split(' ')
let N=parseInt(NS1S2[0])
let S1=parseInt(NS1S2[1])
let S2=parseInt(NS1S2[2])

var A=newSeq[int64](N)
var B=newSeq[int64](N)

for i in 0..N-1:
    let AB=readLine(stdin).split(' ')
    A[i]=parseInt(AB[0])
    B[i]=parseInt(AB[1])

var ans=0

for i in 0..N-1:
    for j in i+1..N-1:
        if S1<=(A[i]-A[j])*(B[i]-B[j]) and (A[i]-A[j])*(B[i]-B[j])<=S2:
            inc(ans)

echo(ans)

Submission Info

Compile Error

Hint: system [Processing]
Hint: Main [Processing]
Hint: strutils [Processing]
Hint: parseutils [Processing]
Hint: sequtils [Processing]
Hint:  [Link]
Hint: operation successful (12951 lines compiled; 2.072 sec total; 13.138MB; Release Build) [SuccessX]

Judge Result