結果

問題 No.55 正方形を描くだけの簡単なお仕事です。
コンテスト
ユーザー むらため
提出日時 2017-08-13 00:28:57
言語 Nim
(2.2.0)
結果
CE  
(最新)
AC  
(最初)
実行時間 -
コード長 1,116 bytes
コンパイル時間 807 ms
コンパイル使用メモリ 67,168 KB
最終ジャッジ日時 2024-11-14 20:12:37
合計ジャッジ時間 1,130 ms
ジャッジサーバーID
（参考情報） 		judge2 / judge4
このコードへのチャレンジ
（要ログイン）
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。（リジャッジ後のコンパイルエラーは公開されます）
ただし、clay言語の場合は開発者のデバッグのため、公開されます。

コンパイルメッセージ
/home/judge/data/code/Main.nim(1, 50) Warning: Use the new 'sugar' module instead; future is deprecated [Deprecated]
stack trace: (most recent call last)
Main.nim(5, 7)           unpack
/home/judge/data/code/Main.nim(20, 52) template/generic instantiation of `unpack` from here
/home/judge/data/code/Main.nim(5, 7) Error: index 1 not in 0 .. 0

ソースコード

diff # 

import sequtils,strutils,strscans,algorithm,math,future,macros
#import sets,queues,tables,nre,pegs
macro unpack*(rhs: seq,cnt: static[int]): auto =
  let t = genSym(); result = quote do:(let `t` = `rhs`;())
  for i in 0..<cnt: result[0][1].add(quote do:`t`[`i`])
template get*():string = stdin.readLine() #.strip()
template times*(n:int,body:untyped): untyped = (for _ in 0..<n: body)
template `max=`*(x,y:typed):void = x = max(x,y)
template `min=`*(x,y:typed):void = x = min(x,y)

type Vec2 = object
  x,y: int
proc `+`(p,v:Vec2):Vec2 = result.x = p.x+v.x; result.y = p.y+v.y
proc `-`(p,v:Vec2):Vec2 = result.x = p.x-v.x; result.y = p.y-v.y
proc `*`(p,v:Vec2):int = p.x * v.x + p.y * v.y
proc sqlen(p:Vec2):int = p.x * p.x + p.y * p.y


let
  (x1,y1,x2,y2,x3,y3) = get().split().map(parseInt).unpack(6)
  z = @[(x1,y1),(x2,y2),(x3,y3),(x1,y1)].mapIt(Vec2(x:it[0],y:it[1]))
for i in 0..<3:
  let
    z1 = z[(i+0) mod 3]
    z2 = z[(i+1) mod 3]
    z3 = z[(i+2) mod 3]
    z12 = z2 - z1
    z13 = z3 - z1
  if z12 * z13 == 0 and z12.sqlen == z13.sqlen:
    let z4 = z3 + z12
    echo z4.x," ",z4.y
    quit()
echo -1
0