結果

問題 No.55 正方形を描くだけの簡単なお仕事です。
ユーザー むらためむらため
提出日時 2017-08-13 00:11:41
言語 Nim
(2.0.2)
結果
CE  
(最新)
AC  
(最初)
実行時間 -
コード長 1,248 bytes
コンパイル時間 866 ms
コンパイル使用メモリ 67,208 KB
最終ジャッジ日時 2024-11-14 20:12:33
合計ジャッジ時間 1,298 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge2
このコードへのチャレンジ
（要ログイン）
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。（リジャッジ後のコンパイルエラーは公開されます）
ただし、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(21, 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)
  z1 = Vec2(x:x1,y:y1)
  z2 = Vec2(x:x2,y:y2)
  z3 = Vec2(x:x3,y:y3)
  z12 = z1 - z2
  z23 = z2 - z3
  z31 = z3 - z1
  z123 = z12 * z23
  z231 = z23 * z31
  z312 = z31 * z12

if z123 == 0 and z12.sqlen == z23.sqlen :
  let z4 = z1 - z23
  echo z4.x," ",z4.y
elif z231 == 0 and z23.sqlen == z31.sqlen :
  let z4 = z2 - z31
  echo z4.x," ",z4.y
elif z312 == 0 and z31.sqlen == z12.sqlen :
  let z4 = z3 - z12
  echo z4.x," ",z4.y
else:
  echo -1
0