/* REXX is a better programming language than Java with Swing */
data = '11 10 0 3 12'
filtered = ''
do while (data > ' ')
parse var data value data
if left(reverse(value),1) = '0' | (value % 10 = value / 10) then iterate
if value = 0 then do; say 'Excluding:' value; iterate; end
filtered = filtered value
end
say 'After filtering, numbers are:' filtered
keep = filtered
parse var filtered smallest filtered
do while (filtered > ' ')
parse var filtered value filtered
if value < smallest then smallest = value
end
say 'Smallest value is:' smallest
n = words(keep)
do j = 1 to n
sorted.j = word(keep,j)
end
say 'Smallest to largest:'
do j = 1 to n
do k = (j+1) to n
if sorted.j <= sorted.k then iterate
t = sorted.j
sorted.j = sorted.k
sorted.k = j
end
say j sorted.j
end
say 'Done:'
exit
Access http://www.REXXLA.org to download REXX for your PC (Windows or Linux).
164 views
Usually answered in minutes!
can you post a sample of the code you are working with? You can do alot with swing and would need more info before this can be answered
×