Skip to main content

AccessTr.neT


İki Sayı Aralığında Tam Sayılar Kümesi

İki Sayı Aralığında Tam Sayılar Kümesi

Çözüldü #1
mesela 1 den 100 kadar olan tam sayılar kümesini nasıl ifade ederiz

if (instr(arrayFromOneToHundred, 35)then
result = true
end if
@benbendedeilem
Cevapla
#2
sayılar diyelim ki şöyle olsun
35,006
35,016
35,206
36,506
36,206
37,106
37,806
38,006
38,106
bunlarda döngüde if komutu içine gelince
35 grubunda bir kez
36 grubunda bir kez
37 grubunda bir kez
38 grubunda bir kez

fonksiyon çalışsın
Cevapla
#3
1 ile 100 arası tüm sayılar tam sayıdır zaten ifadenizde sayıları küsürlü bir işleme tabi tutan bir işlem yok ki
ayrıca önceki konunuzda belirttiğim if int(d)=d doğru çalışıyor kontrol ettim
Cevapla
#4
ayrıca 2. mesajınızda hiç biri tam sayı değil en fazla gelen ilk küsürlü sayı tamsayıya dönüştürülüp farklı diziye eklenir sıradaki gelince eğer aynı tamsayıdan dizide var ise atlanır.
Cevapla
#5
şöyle yapabilirsiniz
dim TamSay as string
Tamsay=",1,2,3,4...…..,100,"
if instr(Tamsay, "," & int(sayınız) & ",")>0 then
fonksiyonu Çağı
replace(Tamsay, "," & int(sayınız) & ",",",")
end if
Cevapla
#6
100 kadar manuel yazacakmıyız
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task