16 lines
233 B
Text
16 lines
233 B
Text
len arr[] 1000
|
|
for n to 1000 - 1
|
|
for m = n - 1 downto 1
|
|
if arr[m] = arr[n]
|
|
arr[n + 1] = n - m
|
|
break 1
|
|
.
|
|
.
|
|
.
|
|
for i to 10
|
|
write arr[i] & " "
|
|
.
|
|
print ""
|
|
for i = 991 to 1000
|
|
write arr[i] & " "
|
|
.
|