Update all new Tasks
This commit is contained in:
parent
00a190b0a6
commit
91df62d461
5697 changed files with 93386 additions and 804 deletions
11
Task/ABC-Problem/J/abc-problem-1.j
Normal file
11
Task/ABC-Problem/J/abc-problem-1.j
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
reduce=: verb define
|
||||
'rows cols'=. i.&.> $y
|
||||
for_c. cols do.
|
||||
r=. 1 i.~ c {"1 y NB. row idx of first 1 in col
|
||||
if. r = #rows do. continue. end.
|
||||
y=. 0 (<((r+1)}.rows);c) } y NB. zero rest of col
|
||||
y=. 0 (<(r;(c+1)}.cols)) } y NB. zero rest of row
|
||||
end.
|
||||
)
|
||||
|
||||
abc=: *./@(+./)@reduce@(e."1~ ,)&toupper :: 0:
|
||||
14
Task/ABC-Problem/J/abc-problem-2.j
Normal file
14
Task/ABC-Problem/J/abc-problem-2.j
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
Blocks=: ];._2 'BO XK DQ CP NA GT RE TG QD FS JW HU VI AN OB ER FS LY PC ZM '
|
||||
ExampleWords=: <;._2 'A BaRK BOoK tREaT COmMOn SqUAD CoNfuSE '
|
||||
|
||||
Blocks&abc &> ExampleWords
|
||||
1 1 0 1 0 1 1
|
||||
require 'format/printf'
|
||||
'%10s %s' printf (dquote ; 'FT' {~ Blocks&abc) &> ExampleWords
|
||||
"A" T
|
||||
"BaRK" T
|
||||
"BOoK" F
|
||||
"tREaT" T
|
||||
"COmMOn" F
|
||||
"SqUAD" T
|
||||
"CoNfuSE" T
|
||||
3
Task/ABC-Problem/J/abc-problem-3.j
Normal file
3
Task/ABC-Problem/J/abc-problem-3.j
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
delElem=: {~<@<@<
|
||||
uppc=:(-32*96&<*.123&>)&.(3&u:)
|
||||
reduc=: ] delElem 1 i.~e."0 1
|
||||
10
Task/ABC-Problem/J/abc-problem-4.j
Normal file
10
Task/ABC-Problem/J/abc-problem-4.j
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
Blocks=: >;:'BO XK DQ CP NA GT RE TG QD FS JW HU VI AN OB ER FS LY PC ZM '
|
||||
ExampleWords=: ;: 'A BaRK BOoK tREaT COmMOn SqUAD CoNfuSE '
|
||||
|
||||
canform=:4 :0
|
||||
word=: toupper y
|
||||
need=: #/.~ word,word
|
||||
relevant=: (x +./@e."1 word) # x
|
||||
candidates=: word,"1>,{{relevant
|
||||
+./(((#need){. #/.~)"1 candidates) */ .>:need
|
||||
)
|
||||
14
Task/ABC-Problem/J/abc-problem-5.j
Normal file
14
Task/ABC-Problem/J/abc-problem-5.j
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
Blocks canform 0{::ExampleWords
|
||||
1
|
||||
Blocks canform 1{::ExampleWords
|
||||
1
|
||||
Blocks canform 2{::ExampleWords
|
||||
0
|
||||
Blocks canform 3{::ExampleWords
|
||||
1
|
||||
Blocks canform 4{::ExampleWords
|
||||
0
|
||||
Blocks canform 5{::ExampleWords
|
||||
1
|
||||
Blocks canform 6{::ExampleWords
|
||||
1
|
||||
Loading…
Add table
Add a link
Reference in a new issue