这图好麻烦啊~

k=1
for i=1 to 5
    print space$(5-i);
    for j=1 to i
        print k;
        k=(k+2) mod 10
    next
    print
next

这个才是:
cls
k=1
for i=1 to 5
    print space$(5-i);
    for j=1 to i
        print k;
        k=(k+2) mod 10
    next j
    print
next i
end

CLS
n = 1
10 FOR i = 1 TO 10
IF i MOD 2 <> 0 THEN k = k + 1: p$ = p$ + CHR$(48 + i)
IF k = 2 * n - 1 THEN
k = 0: t$ = p$: p$ = "": s = n: n = n + 1
PRINT TAB(6 - s); t$
END IF
IF i = 10 THEN GOTO 10
IF n > 5 THEN EXIT FOR
NEXT i
END