To display the following pattern 1 121 123121 1234321 123454321 (Qbasic Code)

To display the following pattern
    1
    121
    123121
    1234321
    123454321

  •  CLS
    a# = 1
    FOR i = 1 TO 5
        PRINT a# ^ 2
        a# = (a# * 10) + 1
    NEXT i
    END