12 lines
171 B
Text
12 lines
171 B
Text
|
s = "asdf"
|
||
|
|
print "'"; s; "' reversed is '"; reverse(s); "'"
|
||
|
|
end
|
||
|
|
|
||
|
|
function reverse(a)
|
||
|
|
b = ""
|
||
|
|
for i = 1 to length(a)
|
||
|
|
b = mid(a, i, 1) + b
|
||
|
|
next i
|
||
|
|
return b
|
||
|
|
end function
|