Anonymous user
Pangram checker: Difference between revisions
added TI-83 (not tested yet)
m (Someone doesn't know their alphabet lol!!! (examples not in alphabetical order!!)) |
(added TI-83 (not tested yet)) |
||
Line 1,688:
}
}
=={{header|TI-83 BASIC}}==
<lang ti83b>:Prompt Str1
:For(L,1,26
:If not(inString(Str1,sub("ABCDEFGHIJKLMNOPQRSTUVWXYZ",L,1))
:L=28
:End
:If L<28
:Disp "IS A PANGRAM"</lang>
(not tested yet)
puts [pangram? "This is a sentence"]; # ==> false
| |||