из двух массивов а (9) и b(16) получить новый массив с, состоящий из логарифмов элементов исходных массивов, которые больше или равны 1,7. полученный массив расположить в порядке убывания
sub ppp()
dim AA(9), BB(16), CC(25)
kk = 1
for ii = 1 to 16
if ii < 10 then
if AA(ii)>=1.7 then
ee=ln(AA(ii))
for mm = 1 to kk
if kk=1 then
CC(1)=ee
else
if ee>CC(mm) then
ee1 = CC(mm)
CC(mm) = ee
ee = ee1
endif
endif
next mm
kk = kk+1
endif
if BB(ii)>=1.7 then
ee=ln(BB(ii))
for mm = 1 to kk
if kk=1 then
CC(1)=ee
else
if ee>CC(mm) then
ee1 = CC(mm)
CC(mm) = ee
ee = ee1
endif
endif
next mm
kk = kk+1
endif
next ii
end sub
⇢