fork download
copy 
  1. mc=...
  2. @(s)s==[65:max(s)]'
  3.  
  4. Key = 'ABBBABABA'
  5. mc(Key)
  6.  
  7. Key = 'AAAAAAAAA'
  8. mc(Key)
  9.  
  10. Key = 'AFGHEEHFD'
  11. mc(Key)
  12.  
  13. Key = 'Z'
  14. mc(Key)
  15.  
  16. Key = 'ABCDCDBCDABC'
  17. mc(Key)
  18.  
Success #stdin #stdout 0.46s 121728KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
mc =

@(s) s == [65:max(s)]'

Key = ABBBABABA
ans =

   1   0   0   0   1   0   1   0   1
   0   1   1   1   0   1   0   1   0

Key = AAAAAAAAA
ans =

   1   1   1   1   1   1   1   1   1

Key = AFGHEEHFD
ans =

   1   0   0   0   0   0   0   0   0
   0   0   0   0   0   0   0   0   0
   0   0   0   0   0   0   0   0   0
   0   0   0   0   0   0   0   0   1
   0   0   0   0   1   1   0   0   0
   0   1   0   0   0   0   0   1   0
   0   0   1   0   0   0   0   0   0
   0   0   0   1   0   0   1   0   0

Key = Z
ans =

   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   0
   1

Key = ABCDCDBCDABC
ans =

   1   0   0   0   0   0   0   0   0   1   0   0
   0   1   0   0   0   0   1   0   0   0   1   0
   0   0   1   0   1   0   0   1   0   0   0   1
   0   0   0   1   0   1   0   0   1   0   0   0
https://ideone.com/1mVbp6
language:
Octave (octave 4.4.1)
created:
8 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!