Допишите программу

10 DIM C(100, 100)

12 OPEN "MK.txt" FOR OUTPUT AS #1

15 PRINT "VVEDITE PORYADOK KVADRATA"

20 INPUT N

30 K = (N - 2) / 2: L = (N + 2) / 2

35 FOR I = L + 1 TO N

40 C(N, I) = N * (N + 2 - I)

45 FOR J = N - 1 TO L STEP -1

50 C(J, I) = C(J + 1, I) - 1

55 NEXT J

60 C(L - 1, I) = C(L, I) - N / 2

65 FOR M = L - 2 TO 1 STEP -1

70 C(M, I) = C(M + 1, I) + 1

75 NEXT M

80 NEXT I

85 FOR I = 2 TO L

90 C(N, I) = N * (I + K)

95 FOR P = N - 1 TO L STEP -1

100 C(P, I) = C(P + 1, I) - 1

105 NEXT P

110 C(L - 1, I) = C(L, I) - N / 2

115 FOR Q = L - 2 TO 1 STEP -1

120 C(Q, I) = C(Q + 1, I) + 1

125 NEXT Q

130 C(N, 1) = N - 1: B = N / 2 + 2

135 FOR T = N - 1 TO B STEP -1

140 C(T, 1) = C(T + 1, 1) - 1

145 NEXT T

147 NEXT I

150 C(N / 2 + 1, 1) = C(N / 2 + 2, 1) - N / 2

155 FOR A = N / 2 TO 2 STEP -1

160 C(A, 1) = C(A + 1, 1) + 1

162 NEXT A

165 C(1, 1) = N

170 FOR X = 1 TO N

175 FOR Y = 1 TO N

180 PRINT C(X, Y);

185 PRINT #1, C(X, Y);

187 NEXT Y

190 PRINT : PRINT #1,

195 NEXT X

197 CLOSE #1

200 END