Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- +/~.(3*i.>.1000%3),5*i.>.1000%5
- [:+/@~.@,3 5([*i.@>.@%~)]
- f =: [:+/@~.@,3 5([*i.@>.@%~)]
- f 1000
- +/~.,3 5([*i.@>.@%~)1000
- %~ = 4 : 'y % x'
- i.@>.@%~ = 4 : 'i. >. y % x'
- [*i.@>.@%~ = 4 : 'x * i. >. y % x'
- 3 5([*i.@>.@%~)] = 3 : '3 5 * i. >. y % 3 5'
- [:+/@~.@,3 5([*i.@>.@%~)] = 3 : '+/ ~. , 3 5 * i. >. y % 3 5'
- multiplesbelow =: 4 : 'I. 0 = x | i.y'
- +/ ~. ,3 5 multiplesbelow"0 [ 1000
Add Comment
Please, Sign In to add comment