A-M baby
This commit is contained in:
parent
764da6cbbb
commit
db842d013d
19005 changed files with 197040 additions and 7 deletions
6
Task/Character-codes/Icon/character-codes.icon
Normal file
6
Task/Character-codes/Icon/character-codes.icon
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
procedure main(arglist)
|
||||
if *arglist > 0 then L := arglist else L := [97, "a"]
|
||||
|
||||
every x := !L do
|
||||
write(x, " ==> ", char(integer(x)) | ord(x) ) # char produces a character, ord produces a number
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue