| 
					 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19  | 
						DATA: a  TYPE n,       b  TYPE n,       x  TYPE p,       x1 TYPE char2. a = 0. b = 0. DO 9 TIMES.   a = a + 1.   b = 0.   DO a TIMES.     b = b + 1.     x = a * b.     x1 = x.     WRITE:a,'*',b,'=',x1.   ENDDO.   WRITE:/. ENDDO.  | 
					
以上。



感谢分享
2019-06-24 11:10 上午