Yeni Kayıt
Konudaki Resimler
|
Hızlı 
Bildirim
En yakın asal sayı bulma (Visual Basic)
Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla 
Bu Konudaki Kullanıcılar:
Daha Az 
2 Misafir - 2 Masaüstü
Giriş
Mesaj
-
-
- sayıyı al
- döngü X = sayıdan bir küçük sayı to 1
- içiçe döngü Y = x-1 to 1
- sorgula X , Y ye tam bölünüyor mu?
- döngü sonunda tam bölünme yoksa ASAL sayı X
gibi bir kodlama gerek -
quote:
Orijinalden alıntı: ozankirmizi
visual basic'i yeni yeni öğreniyorum ve bir ödevim var. girilen sayıdan küçük en yakın asal sayıyı bulmam gerekiyor. bu konu hakkında fikir verebilecek varsa çok sevinirim.
Merhaba
< Bu mesaj bu kişi tarafından değiştirildi kemalbayraktar -- 5 Mart 2012; 21:48:38 > -
quote:
Orijinalden alıntı: kemalbayraktar
quote:
Orijinalden alıntı: ozankirmizi
visual basic'i yeni yeni öğreniyorum ve bir ödevim var. girilen sayıdan küçük en yakın asal sayıyı bulmam gerekiyor. bu konu hakkında fikir verebilecek varsa çok sevinirim.
Merhaba
teşekkür ederim. yalnız bu visual basic için mi?
-
quote:
Orijinalden alıntı: ozankirmizi
quote:
Orijinalden alıntı: kemalbayraktar
quote:
Orijinalden alıntı: ozankirmizi
visual basic'i yeni yeni öğreniyorum ve bir ödevim var. girilen sayıdan küçük en yakın asal sayıyı bulmam gerekiyor. bu konu hakkında fikir verebilecek varsa çok sevinirim.
Merhaba
teşekkür ederim. yalnız bu visual basic için mi?
Rica ederim. Java dili ile yazdım ve derleyip çalıştırdım. Ancak bir fikir verebilir diye düşünmüştüm.
-
quote:
Orijinalden alıntı: kemalbayraktar
quote:
Orijinalden alıntı: ozankirmizi
quote:
Orijinalden alıntı: kemalbayraktar
quote:
Orijinalden alıntı: ozankirmizi
visual basic'i yeni yeni öğreniyorum ve bir ödevim var. girilen sayıdan küçük en yakın asal sayıyı bulmam gerekiyor. bu konu hakkında fikir verebilecek varsa çok sevinirim.
Merhaba
teşekkür ederim. yalnız bu visual basic için mi?
Rica ederim. Java dili ile yazdım ve derleyip çalıştırdım. Ancak bir fikir verebilir diye düşünmüştüm.
malesef o kadar bilgim yok. tekrar teşekkür ederim.
-
şu kodları oluşturdum
üzerinde çalışmak gerekebilir
form üzerine bir buton bir de textbox yerleştirin
textbox multiline=true olsun
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim asalsayi As Boolean
Dim sayi
Dim n, x, z
sayi = Int(InputBox("Sayı giriniz"))
TextBox1.Clear()
For n = (sayi - 1) To 2 Step -1
z = n \ 2
For x = 2 To z
Dim kalan = n Mod x
If kalan = 0 Then
TextBox1.Text = TextBox1.Text & n & " sayısı " & x & "'e bölündü" & vbCrLf
Exit For
End If
If x = z Then
TextBox1.Text = TextBox1.Text & "===================" & vbCrLf
TextBox1.Text = TextBox1.Text & sayi & " sayısına en yakın küçük asal sayı " & n & " dir"
asalsayi = True
End If
Next
If asalsayi = True Then Exit For
Next
End Sub
Sayfa:
1
Benzer içerikler
- word tek sayfayı yatay yapma
- televizyonda youtube tam ekran olmuyor
- lsass.exe nedir
- dosya başka bir işlem tarafından kullanıldığından bu işlem dosyaya erişemiyor
- easeus data recovery wizard lisans kodu
- google play hizmetleri sürekli olarak duruyor
- ip tv
- bu site güvenli bağlantı sağlayamıyor
- yapay zeka ile borsa tahmini
- statik ip öğrenme
Ip işlemleri
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
