dimitri/apl-competition-2020
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Solve problem 7 task 1

Browse source
This commit is contained in:
Dimitri Lozeve 2020-05-10 22:45:09 +02:00
parent baeb85af01
commit 90a708c5fc
1 changed files with 3 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Contest2020/Contest2020.dyalog
View file

@ -116,11 +116,9 @@
text←('@[a-zA-Z]*@'⎕R{ns getval ¯1↓1↓⍵.Match})template text←('@[a-zA-Z]*@'⎕R{ns getval ¯1↓1↓⍵.Match})template
∇ ∇
∇ digit←CheckDigit digits
⍝ 2020 APL Problem Solving Competition Phase II ⍝ 2020 APL Problem Solving Competition Phase II
⍝ Stub function for Problem 7, Tasl 1 - CheckDigit ⍝ Problem 7, Tasl 1 - CheckDigit
⍝ Put your code and comments below here CheckDigit←{10|-10|⍵+.×11⍴3 1}
∇
∇ bits←WriteUPC digits ∇ bits←WriteUPC digits
⍝ 2020 APL Problem Solving Competition Phase II ⍝ 2020 APL Problem Solving Competition Phase II