Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
|
|
@ -0,0 +1,26 @@
|
|||
import math
|
||||
|
||||
proc line(img: var Image, p, q: Point) =
|
||||
let
|
||||
dx = abs(q.x - p.x)
|
||||
sx = if p.x < q.x: 1 else: -1
|
||||
dy = abs(q.y - p.y)
|
||||
sy = if p.y < q.y: 1 else: -1
|
||||
|
||||
var
|
||||
p = p
|
||||
q = q
|
||||
err = (if dx > dy: dx else: -dy) div 2
|
||||
e2 = 0
|
||||
|
||||
while true:
|
||||
img[p] = Black
|
||||
if p == q:
|
||||
break
|
||||
e2 = err
|
||||
if e2 > -dx:
|
||||
err -= dy
|
||||
p.x += sx
|
||||
if e2 < dy:
|
||||
err += dx
|
||||
p.y += sy
|
||||
Loading…
Add table
Add a link
Reference in a new issue