1. Bu site çerezler kullanır. Bu siteyi kullanmaya devam ederek çerez kullanımımızı kabul etmiş olursunuz. Daha Fazla Bilgi.

QBasic ile Geometrik dağılımdan sayı üretme

'Bilgisayar Programlama ve Kodlama' forumunda Powers tarafından 8 Ocak 2013 tarihinde açılan konu

  1. Powers

    Powers Administrator Site Yetkilisi

    'Geometrik dagi￾l￾mdan Sayi￾ Uretme
    CLS
    RANDOMIZE TIMER
    INPUT "p="; p
    tekrar = 1
    bas:
    IF RND < p THEN
    GOTO son
    ELSE
    tekrar = tekrar + 1
    GOTO bas
    son:
    PRINT "ilk basari￾="; tekrar
    END IF
     
    Tags:

Bu Sayfayı Paylaş

  1. Bu site çerezler kullanır. Bu siteyi kullanmaya devam ederek çerez kullanımımızı kabul etmiş olursunuz. Daha Fazla Bilgi.
  1. Bu site çerezler kullanır. Bu siteyi kullanmaya devam ederek çerez kullanımımızı kabul etmiş olursunuz. Daha Fazla Bilgi.
Yükleniyor...