Directory of image this file is from
This file as a plain text file

2 A=1
5 DIM X(30),Y(30),Z(30)
10 INPUT N
15 FOR I=1 TO N 
20 FOR J=(I+1) TO N 
25 X(A)=I*10
30 Y(A)=J 
35 Z(A)=X(A)+Y(A) 
37 PRINT A
41 PRINT X(A);Y(A);Z(A) 
42 A=A+1
45 NEXT J 
50 NEXT I 
51 PRINT A
52 PRINT Z(1);Z(2);Z(3);Z(4);Z(5);Z(6)
53 A=A-1
55 FOR I=1 TO A 
59 PRINT Z(I);  
60 NEXT I 
78 C=1
79 B=1
80 IF X(C)<>X(B+1) GO TO 90 
82 B=B+1
85 IF B=N GO TO 90\GO TO 80 
90 IF Y(C)<>X(B+1)/10 GO TO 100 
95 B=B+1
96 IF B>N+1 GO TO 115\GO TO 90
100 IF Y(C)<>Y(B+1) GO TO 110
101 B=B+1
102 IF B>N GO TO 115\GO TO 100 
110 LPRINT Z(C);Z(B+1) 
115 C=C+1\LPRINT 
116 IF C>N GO TO 199 
117 B=C
118 GO TO 80 
199 END