E *G T :1 N:36 :6 :5 :4 :4 :0 :9 :8 :7 :7 :7 :0 :0 :17 :4 :5 :6 :7 :8 :9 :19 :21 :27 :0 :27 :0 :27 :21 :19 :9 :8 :7 :6 :5 :4 :4 :4 [][][][] [][][][][] [][][][][][][][][][] [] [][][][][][][][][][][] [][][][] [][][][][] [][][][][][][][][][] [] [][][][][][][][][][][] [][][][] [][][][][] [][][][][][][][][][] [] [][][][][][][][][][][] [][][][] [][][][][] [][][][][][][][][][] [] [][][][][][][][][][][] [][] [][][][][] [] [][][][][][][][] [] [][][][][][][][] [] [][][][][] [] [][][][][][][] [] [][][][][][][] [][][][][] [] [][][][][][] [] [][][][][][] [][] [] [][][][][] [] [][][][][] [] [] [][][][] [] [][][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [] [][][] [][][] [] [][][] [][][] [] [][][] [][] [] [][] [][] [] [][] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] [] *W C-FOCAL,1969 10.05 A ?T N?;F Q=1,T;T !;F I=1,N;A " ",L;S A(I)=A(I)+L 10.10 T !!!!!!!!!! 12.05 S K=0;F I=1,N;I (A(I))12.1,12.1;T "[]";S A(I)=A(I)-1 12.10 T " ";S K=K+1 12.15 T !;I (K-N+1)12.05,12.05;T !!!!!!!!!!;Q * FLOWCHART OF PROGRAM OPERATION: A / SET T N S Q=1 T ! NO Q>T YES S I=1 S Q=Q+1 A:L S A(I)=A(I)+L NO I>N YES S I=I+1 T !!!!!!!!!! T "[]" S K=0 S A(I)=A(I)-1 T " " A(I)<=0 S I=1 S K=K+1 NO T !!!!!!!!!! S I=I+1 I>N QUIT NO T ! K-N+1<=0 YES