-
1.
+4public 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.
+1printf("Hello world");
ben bu kadar biliyom panpa kusura bakma -
3.
+1fibonacci ne lan prison break terk
-
4.
+1yakaladım seni o.ç ver kağıdını sıfır
-
5.
+1p = 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.
0visual basic terk
-
7.
0uppp yardım taşşak geçmeyin amk zor durumdayım diorm ya
-
8.
0c^# () 1-20 from "fibonacchi"
sum product
al bakalım koçluk... -
9.
0hay gibeyim kimse yardım etmiyor sokayım am züt memenize yaa
-
10.
0up up up up up yardımmm
-
11.
0i 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.
0up up up up
-
13.
0upp kimesde yok mu ya panpalar son 15 dk lütfen ya
-
14.
0upppppppp
-
15.
0upupupup
-
16.
0up uppp upppppppppp
-
17.
0huur 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.
03 lan 3 yarram ne var bunu yapamayacak amk
-
19.
0fibonacci kanadada amk 345 no hamilton sokak
-
20.
0kopta çekme oçe
-
inci sözlük şukusuzluğu
-
koskoca dünyada inci sözlükte 30 kişi online
-
bangladeş vatandaşı olmak istiyorum
-
aishe chatgpt senden daha akıllı la
-
aishe abidik gubidik bilgiler verme
-
tak kanseri oldum
-
adana ya safak operasyonu
-
38 kişi kaldık
-
aishe aslında sexting hizmeti sağlasa
-
delikanlı adam çaylak değil paşalar gibi silik yer
-
aishe arkadan mı önden mi
-
ölse de ziksem
-
beyninizde tümör yerine makat oluşsa
-
01adanaq47nin annesi
-
memati tarafından ağır tehdit altındayım
-
fidan hocanın son fotosu
-
aklima cok super bi fikir geldi
-
isminiz google görsellerde kaçıncı sırada çıkıyor
-
aishe hakkında geri bildirim
-
beyler size bakıyorum ve
-
zar sağlamsa
-
mustafa kemalin boyu 1 62 dir
-
ndng berkay gamerin annesi
-
geldim suku icinin annesi
-
aishe butun sozluk abazalarinin
-
bu sözlükte en çok feyzullah ın hayatını merak
-
sözlüğün yeni bir tasarıma ihtiyacı var
-
800kyakupun annesi
-
keşke saç ekim doktoru olsaydım
-
beynimde makat varr
- / 2