14 lines
154 B
Text
14 lines
154 B
Text
var ch = char
|
|
var n = integer
|
|
|
|
ch = 'a'
|
|
n = ch
|
|
print ch; " = "; n
|
|
print ch; " = "; asc(ch)
|
|
|
|
n = 97
|
|
ch = n
|
|
print n; " = "; ch
|
|
print n; " = "; chr$(n)
|
|
|
|
end
|