می شه یک کمکی کنید

[jadougar]

2 آرایه صعودی را دریافت کنه که آرایه ها هم a , b باشه و با آرایه c را به طول 20 را با هم اقدام کنیم



یکی هم اسامی دانش آموزان رو بگیره و به صورت صعودی بچینه


سومی هم
10 عدد دریاف و آن ها را به طول آرایه اضافه کنه و کل آرایه را به صورت صعودی مرتب کنه

[Satanic2000]

2


سومی هم
10 عدد دریاف و آن ها را به طول آرایه اضافه کنه و کل آرایه را به صورت صعودی مرتب کنه

در جواب سومی باید بگم با یکمی تغغیر راحت میتونی درست کنی از این زیر کمک بگیر .

general
--
option base 1
dim b as integer
dim a(10) as integer
-------

cmd 1
--
for i = lbound(a) to ubound (a)
a(i)= inputbox("adad")
list1.additem a(i)
next
--
cmd 2
--- for j= 1 to ubound(a)
for i= 1 to ubound(a)
if a(i)>a(i) then
b=a(i)
a(i)=a(j)
end if
next i
next j
for k = 1 to 10
list 2.additem a(k)
next