#if 0
    c++ -pipe -xc++ -fpermissive -w -o "${0%.*}".exe "$0" && ./"${0%.*}.exe" ; exit $?
#endif
#include "ptsvubas.cc"

BEGINBASIC(int,main,())
10 DIM A(5);
15 LET C=42;
20 PRINT "Array demo";
22 LET J=0;
30 LET I=0;
35 LET B=A(I);
40 PRINT "A (", I ,")=", B;
45 LET A(I)=A(I)+3;
50 LET I=I+1;
60 IF I<5 THEN 35;
70 PRINT "Happy exit?";
75 LET J=J+1;
78 IF J<4 THEN 30;
79 PRINT "C = ", C;
80 END 0;
ENDBASIC