к
Size: a a a
к
AP
AP
к
ЗП
ZK
AP
n*(n-1)/2ЗП
ZK

ZK
ZK
length [(a, b) | a <- [1..10], b <- [1..9],a/=b], как сказал @astynaxAP
length [(a, b) | a <- [1..10], b <- [1..9],a/=b], как сказал @astynaxAP
10 получается недостижимо из 1..9ZK
ZK
ZK
AP
ZK
length [(a, b) | a <- [1..10], b <- [2..10],a/=b], что в общем-то то же самоеAP
b/=x в условие, вместо ограничения диапазонаAP
length
[ ()
| a <- [1..10]
, b <- [1..10]
, a /= b
, b /= 1
]