1. 1.
    +4
    public class form1
    sub checkprime(byval a as integer, byref p as boolean)
    dim k as integer
    p = true
    for k = 2 to a - 1
    if a mod k = 0 then p = false
    next
    if a = 0 or a = 1 then p = false
    end sub
    private sub button1_click(byval sender as system. object, byval e as system. eventargs) handles button1.click
    dim arr(), n, i, counter as integer
    dim prime as boolean
    randomize()
    n = inputbox("enter array size") - 1
    redim arr(n)
    for i = 0 to ubound(arr)
    arr(i) = i
    next i
    for i = 0 to ubound(arr)
    checkprime(arr(i), prime)
    if prime then
    textbox1.text = textbox1.text & arr(i) & vbtab
    counter += 1
    end if
    next i
    textbox1.text = textbox1.text & vbcrlf & "there are " & counter & " prime numbers" & vbtab
    end sub
    end class

    al panpa
    ···
  2. 2.
    +1
    printf("Hello world");
    ben bu kadar biliyom panpa kusura bakma
    ···
  3. 3.
    +1
    fibonacci ne lan prison break terk
    ···
  4. 4.
    +1
    yakaladım seni o.ç ver kağıdını sıfır
    ···
  5. 5.
    +1
    p = true
    for k = 2 to a - 1
    if a mod k = 0 then p = false
    next
    if a = 0 or a = 1 then p = false
    end sub
    ···
  6. 6.
    0
    visual basic terk
    ···
  7. 7.
    0
    uppp yardım taşşak geçmeyin amk zor durumdayım diorm ya
    ···
  8. 8.
    0
    c^# () 1-20 from "fibonacchi"
    sum product

    al bakalım koçluk...
    ···
  9. 9.
    0
    hay gibeyim kimse yardım etmiyor sokayım am züt memenize yaa
    ···
  10. 10.
    0
    up up up up up yardımmm
    ···
  11. 11.
    0
    i sayi dizisinin ilk 20 teriminin hesaplayıp arrayliste atan ve tek numaralı terimleri toplayıp çift numaralı terimleri listeleyen programı yazınız.

    edit: c# beyler aceleden yazamamışm yardım edin
    microsoft visiual basic programı ile panpalar lütfen
    ···
  12. 12.
    0
    up up up up
    ···
  13. 13.
    0
    upp kimesde yok mu ya panpalar son 15 dk lütfen ya
    ···
  14. 14.
    0
    upppppppp
    ···
  15. 15.
    0
    upupupup
    ···
  16. 16.
    0
    up uppp upppppppppp
    ···
  17. 17.
    0
    huur cocugu sen okuyorsun bu dersi senin yapman lazım yapamazsan nabak amk.. tek bi tak anlamadım anlasam yardımcı olurdum amk

    neyse güncelleyek panpamıza bi yardim olsun buda

    gibtigimin malı
    ···
  18. 18.
    0
    3 lan 3 yarram ne var bunu yapamayacak amk
    ···
  19. 19.
    0
    fibonacci kanadada amk 345 no hamilton sokak
    ···
  20. 20.
    0
    kopta çekme oçe
    ···