10 CLS
20 N = 10
30 DIM A(1 TO N) AS INTEGER
40 A(1) = 1
50 A(2) = 2
60 A(3) = 3
70 A(4) = 4
80 A(5) = 5
90 A(6) = 6
100 A(7) = 7
110 A(8) = 8
120 A(9) = 9
130 A(10) = 10
140 PRINT “ELEMENTS AFTER APPLYING PROCESS”
150 FOR K = 1 TO N
    160 PRINT A(K),
170 NEXT K
180 FOR N = 1 TO N
    190 C = 0
    200 FOR I = 1 TO N
        210 IF N MOD I = 0 THEN C = C + 1
    220 NEXT I
    230 IF C = 2 THEN PRINT N, “IS A PRIME NUMBER”
240 NEXT N

250 END
PROGRAM RESULT