RosettaCodeData/Task/Reverse-a-string/PowerBASIC/reverse-a-string.basic
2023-07-01 13:44:08 -04:00

6 lines
103 B
Text

#DIM ALL
#COMPILER PBCC 6
FUNCTION PBMAIN () AS LONG
CON.PRINT STRREVERSE$("PowerBASIC")
END FUNCTION