Sayfa 1 - Toplam 5 12345 SonSon
Bulunan 1 den 10 - Toplam 43
Asal sayı algoritması - - Programlama - Ceviz Forum
  1. #1
    Ceviz Üyesi
    Üyelik Tarihi
    02-Mayıs-2003
    Nereden
    İzmir
    Mesaj
    125

    Varsayılan Asal sayı algoritması

    Bir pozitif tamsayının asallığını yazdıran algoritma:

    L<0
    Print 'bir sayı gir'
    Read S
    I<1
    5:I<I+1
    K<S
    K<K-I
    If K>I then goto 10 endif
    If K^=0 then L<L+1 endif
    If I<S-1 then goto 5 endif
    If L=S-2 then print S,'sayısı asaldır'
    end.



    Bunun mantığını bir türlü çözemedim. Deneme olarak asal sayı yerleştirip çalıştırmaya çalışıyorum fakat anlayamadım. Kabaca yardımcı olursanız sevinirim...

  2. #2
    Ceviz Üyesi
    Üyelik Tarihi
    03-Temmuz-2006
    Mesaj
    387

    Varsayılan

    Hangi dilde yazıldığı hakkında bir fikrim olmadığı için kod ile ilgili yorum yapamayacağım maalesef... Onun yerine kendi algoritmanızı da yazmaya çalışabilirsiniz. Meselâ, sayıyı ikiye bölüp, bölümden geriye doğru sayarak tüm olası çarpanları deneyebilirsiniz.
    "...peki bu bilgi gerçek hayatta ne işime yarayacak?..."

  3. #3
    Ceviz Üyesi
    Üyelik Tarihi
    02-Mayıs-2003
    Nereden
    İzmir
    Mesaj
    125

    Varsayılan

    Sparks dilinde... Teşekkür ederim artık anlamaya çalışacağım. Ezberlemek de istemiyorum.

  4. #4
    . Fobus Üyenin Avatarı
    Üyelik Tarihi
    07-Şubat-2003
    Mesaj
    1,075

    Varsayılan

    bende bi tane söyliyeyim yeri gelmişken...
    elimizde bir x sayısı olsun asal olup olmadigina bakalim

    x=5; (mesela 5 sayısına bakalım)
    2^x=32;
    32-2=30;
    30 mod x =0 ise Asal
    30 mod x= 0 Degil ise Asal degil...

    x=6; (mesela 6 sayısına bakalım)
    2^x=64;
    64-2=62;
    62 mod x =2 (sıfırdan farklı asal degil)

  5. #5
    Ceviz Üyesi
    Üyelik Tarihi
    13-Mayıs-2003
    Nereden
    TurKey
    Mesaj
    1,626

    Varsayılan

    @Fobus güzelmiş. bu kural nerde geçiyor acaba ?
    Güçlü bir TÜRKİYE için önce güçlü bir TÜRKÇE!

  6. #6
    Ceviz Üyesi SrcnCkr Üyenin Avatarı
    Üyelik Tarihi
    27-Ekim-2006
    Nereden
    Bursa
    Mesaj
    480

    Varsayılan

    DotNetKid, dil olarak mı sordun bilmiyorum ama bunu her dile ayarlamak bence mümkün Çokta basit olmuş, akşama delphi sınavı vardı en çok korktuğum konu asal düzendi ve sayende anladım saolasın

    The End..!

  7. #7
    Ceviz Üyesi
    Üyelik Tarihi
    26-Nisan-2005
    Nereden
    İst
    Mesaj
    2

    Varsayılan

    Alıntı Fobus Demiş ki: Mesajı Görüntüle
    bende bi tane söyliyeyim yeri gelmişken...
    elimizde bir x sayısı olsun asal olup olmadigina bakalim

    x=5; (mesela 5 sayısına bakalım)
    2^x=32;
    32-2=30;
    30 mod x =0 ise Asal
    30 mod x= 0 Degil ise Asal degil...

    x=6; (mesela 6 sayısına bakalım)
    2^x=64;
    64-2=62;
    62 mod x =2 (sıfırdan farklı asal degil)
    Çok güzel bir program ama bu programın matematikte bir karşılığı varmı.

  8. #8
    Ceviz Üyesi
    Üyelik Tarihi
    06-Ekim-2006
    Mesaj
    17

    Varsayılan

    import java.util.Scanner;
    public class asalsayi {

    /**
    * @param args
    */
    public static void main(String[] args) {
    // TODO Auto-generated method stub
    Scanner input=new Scanner(System.in);
    int i=1;
    int sayi=input.nextInt();
    int sub=0;
    while(i<=sayi)
    {
    if(sayi%i==0)
    sub=sub+1;
    i++;
    }
    if(sub==2)
    System.out.println(sayi+" sayisi bir asal sayidir..");
    else
    System.out.println(sayi+" sayisi asal degildir..");
    }

    }


    Java da soyle birsey yazabiliriz,
    Burdaki mantik su: kullanici sayi giriyo,bilgisayar verdigimiz sayiyi 1 den basliyarak,o sayiya kadar butun sayilara boluyo.Eger sadece 1 ve kendisi bolunuyosa asal olduguna karar veriyo..
    Bu arada 2^x li ifade ilgincmis,matematiksel olarak ispati nasil acaba?bilen varmi?

  9. #9
    Ceviz Üyesi Mr_MOON Üyenin Avatarı
    Üyelik Tarihi
    19-Mayıs-2005
    Nereden
    In cold light of the morning
    Mesaj
    318

    Varsayılan

    2^x pascal da üs almaydı yanlış hatırlamıyosam ama neden üs alındıktan sonra 2 çıkarılıyo onu çözemedim
    Ahmak olmasaydın insan tüm zaferler dostça kazanılırdı.

    Giriş, Gelişme , Mr_MooN!!!

  10. #10
    . Fobus Üyenin Avatarı
    Üyelik Tarihi
    07-Şubat-2003
    Mesaj
    1,075

    Varsayılan

    Alıntı Mr_MOON Demiş ki: Mesajı Görüntüle
    2^x pascal da üs almaydı yanlış hatırlamıyosam ama neden üs alındıktan sonra 2 çıkarılıyo onu çözemedim
    Bu algoritmayi Hindistanlı matematikciler bulmuş. Bu neden 2 çıkarılıyor dersen bi ispat yaparak açıklamak gerekir onu da ben yapamam. Doğru ve kabul edilmiş bir asal sayı bulma algoritması. İsteyen olursa çeşitli dillerde hazirlayabilirim. 1 saat = 30$

Konu Bilgileri

Bu Konuya Gözatan Kullanıcılar

Şu anda 1 kullanıcı bu konuyu görüntülüyor. (0 kayıtlı ve 1 misafir)

Yer İmleri

Mesaj Yetkileriniz

  • Yeni konu açmaya yetkiniz yok
  • Cevap yazmaya yetkiniz yok
  • Eklenti yüklemeye yetkiniz yok
  • Mesajınızı düzeltmeye yetkiniz yok
  •