use min and abs

main
Christian Ulrich 2021-12-07 22:26:40 +01:00
parent dc76148408
commit 19804b3a8f
No known key found for this signature in database
GPG Key ID: 8241BE099775A097
2 changed files with 8 additions and 12 deletions

View File

@ -18,16 +18,14 @@
import sequtils
import strutils
proc distance(a, b: uint16): int =
result = if a < b: int(b - a) else: int(a - b)
proc distance(a, b: int16): int =
result = int(abs(b - a))
proc minimizeFuel(): int =
let crabs = readLine(stdin).split(',').mapIt(uint16(parseUint(it)))
let crabs = readLine(stdin).split(',').mapIt(int16(parseUint(it)))
result = high(int)
for pos in crabs.min() .. crabs.max():
let sum = crabs.foldl(a + distance(b, pos), 0)
if sum < result:
result = sum
result = min(result, crabs.foldl(a + distance(b, pos), 0))
proc main(): int =
try:

View File

@ -18,18 +18,16 @@
import sequtils
import strutils
proc distance(a, b: uint16): int =
let linearDistance = if a < b: int(b - a) else: int(a - b)
proc distance(a, b: int16): int =
let linearDistance = int(abs(b - a))
# 1 + 2 + 3 + ... + n - 1 is the binomial coefficient (n over k) with k = 2
result = (linearDistance + 1) * linearDistance div 2
proc minimizeFuel(): int =
let crabs = readLine(stdin).split(',').mapIt(uint16(parseUint(it)))
let crabs = readLine(stdin).split(',').mapIt(int16(parseUint(it)))
result = high(int)
for pos in crabs.min() .. crabs.max():
let sum = crabs.foldl(a + distance(b, pos), 0)
if sum < result:
result = sum
result = min(result, crabs.foldl(a + distance(b, pos), 0))
proc main(): int =
try: