13.06.2010, 14:07
|
|
Познающий
Регистрация: 13.05.2008
Сообщений: 33
Провел на форуме:
333145
Репутация:
6
|
|
Vb 6
помогите написать програмный код! Сформировать из исходного массива А массив В, в котором вначале идут все положительные, затем отрицатильные, а в конце нулевые елементы массива А.
const k=10
dim j, t, l as integer
dim c(1 to 10
for l=1 to k
c(l)=inputbox(l)
next l
for l=1 to k
for j=(l+1) to k
if c(l) > c(j) then
r=c(l):c(l)=c(j):c(j)=r
end if
next j
next l
for L=1 to k
print c(l)
next
end sub
все правильно, ток нулевые надо в конец , помогите плиз!!!
Последний раз редактировалось 7on; 13.06.2010 в 14:11..
|
|
|