Bir Dizideki Harf Sıklığını Sayma

• Mayıs Ayı 4, 2024

Bu örnek kod, hangi dizilerin kullanılabileceğini görmenize yardımcı olur ve ayrıca bir döngü eylemini gösterir.

Kullanıcının bir cümle girmesini istediğinizi ve ardından alfabenin her harfini kaç kez kullandıklarını bildirmek istediğinizi varsayalım. Kullanıcı yazdıysa:

Kedimi yedim.

Bir sayfa döndürürdünüz:

a: 2
c: 1
e: 1
i: 1
m: 1
t: 2
y: 1

Tamam, birinci adım. Alfabenin her harfi için bir tane olmak üzere 26 farklı öğe saymak istiyorsunuz. Bu sadece çığlıklar atıyor dizi. Bu yüzden bir

Sönük Mektup Sayısı (26)
CurrLtr için = 1 ila 26
LetterCount (CurrLtr) = 0
Sonraki

Bu, bir sonraki döngü için iyi bir örnektir. Tamam, şimdiye kadar çok iyi. Saymaya başlamak için bekleyen 26 noktanız var. Şimdi içinde ne olduğunu görmek için cümle boyunca yolunuzu çalışmak. Diyelim ki bu cümleyi CurrText olarak adlandırıyorsunuz.

İlk olarak, cümledeki her harfi kontrol etmek istersiniz. Bunu bir do-while döngüsü ile yapacağım, böylece bunun nasıl çalıştığını görebilirsiniz. Yani şöyle başlıyorsunuz:

SenLen = len (CurrText)
CurrCtr = 1
while CurrCtr <= SenLen
CurrLtr = sol (CurrText, 1)

Sıradaki mektubu aldınız. Şimdi, elbette her harfin kendisiyle ilişkili bir ascii değeri var. Bunlar A için 65 ila Z için 90 arasında değişir. Böylece, 65 ve 90 arasında düştüğünden emin olmak için harfi büyük harfle yazın ve A = 1 ve Z = 26 olacak şekilde 64'ü çıkarın.

CurrLtr = ucase (CurrLtr)
CurrLtrA = artan (CurrLtr)
CurrLtrA = CurrLtrA - 64

Şimdi 1'den 26'ya kadar bir rakam var, bu da bunun hangi harf olduğunu gösteriyor. Bir sonraki adım elbette kolaydır. Sadece o kovayı arttırıyorsun! İsterseniz, akışa girme konusunda endişeleriniz varsa, harf olmayanları göz ardı ettiğinizden emin olabilirsiniz.

CurrLtrA> 0 ve CurrLtrA <65 ise
LetterCount (CurrLtrA) = LetterCount (CurrLTrA) + 1
eğer biterse

Ve şimdi döngünün sonu, sadece üzerinde çalıştığın mektubdan kurtulursun, böylece döngüde dolaştığında, cümledeki ilk harf sırayla bir sonraki harf olur.

CurrText = Sağ (CurrText, len (CurrText) - 1)
CurrCtr = CurrCtr + 1
döngü

Şimdi diziniz 0'dan her neyse, her biri o harfin kaç kez bulunduğunu gösteren sayılarla doludur. Bunları istediğiniz şekilde görüntüleyebilirsiniz. Bir döngü ve belirli bir ASCII koduna sahip harfi gösteren CHR işlevini kullanmak istiyorsanız, şunları yapabilirsiniz:

CurrLtr için = 1 ila 26
response.write "Mektup"
CurrAscii = CurrLtr + 64
CurrLtrA = chr (CurrAscii)
response.write CurrLtrA & "bulundu"
response.write LetterCount (CurrLtr) & "kez.
"
Sonraki

Forumlarımıza uğradığınızdan emin olun veya herhangi bir sorunuz varsa yazın!

ASP E-kitabına Giriş ASP öğrenme hakkında bilmeniz gereken her şeyi almak için bu e-kitabı indirin - adım adım öğreticiden işlev listeleri, örnek kod, yaygın hatalar ve çözümler ve çok daha fazlası! 101 sayfa.

Video Talimatları: A'dan Z'ye Sevimli Hayvanlar Çizgi Filmi | Tüm Bölümler (Mayıs Ayı 2024).