ספירת תדירות אותיות במערך

• אַפּרִיל 23, 2024

קוד דוגמה זה עוזר לך לראות לאילו מערכים ניתן להשתמש, ומציג גם לולאה בפעולה.

נניח שאתה רוצה שהמשתמש יכניס משפט ואז אתה רוצה ליידע אותם כמה פעמים הם השתמשו בכל אות באלף-בית. אז אם המשתמש הקליד:

אכלתי את החתול שלי.

אתה תחזיר דף שאומר:

א: 2
ג: 1
ה: 1
i: 1
מ: 1
t: 2
y: 1

אוקיי, שלב ראשון. אתה רוצה לספור 26 פריטים שונים, אחד לכל אות באלף-בית. זה כמעט צורח מערך. אז התחל עם א

מכתב אותיות עמום (26)
עבור CurrLtr = 1 עד 26
LetterCount (CurrLtr) = 0
הבא

זו דוגמא טובה ללולאה הבאה. אוקיי, עד כה כל כך טוב. יש לך 26 נקודות באפס, מחכות להתחיל לספור. עכשיו עבד את דרכך במשפט כדי לראות מה יש בו. נניח שאתה קורא למשפט הזה CurrText.

ראשית, ברצונך לבדוק כל אות במשפט. אני אעשה זאת באמצעות לולאה של זמן לעשות כך שתוכלו לראות איך זה עובד. אז תתחיל עם:

SenLen = len (CurrText)
CurrCtr = 1
לעשות בזמן CurrCtr <= SenLen
CurrLtr = שמאל (CurrText, 1)

יש לך את המכתב הבא בסדר. עכשיו, לכל אות כמובן יש ערך אסייתי המקושר אליו. אלה נעות בין 65 ל- A ל- 90 עבור Z. קייס משנה. אז בשלב הבא אתה מכתב את האות בכדי לוודא שהוא נופל בין 65 ל 90, ומחסיר את 64 כך ש- A = 1 ו- Z = 26.

CurrLtr = ucase (CurrLtr)
CurrLtrA = מייקר (CurrLtr)
CurrLtrA = CurrLtrA - 64

אז עכשיו יש לך מספר בין 1 ל -26 המציין באיזה מכתב מדובר. השלב הבא הוא כמובן קל. אתה רק מעלה את הדלי הזה! אם תרצו, תוכלו לדאוג להתעלם מכל אי-מכתב, אם אתם חוששים מהם שייכנסו לזרם.

אם CurrLtrA> 0 ו- CurrLtrA <65 אז
LetterCount (CurrLtrA) = LetterCount (CurrLTrA) + 1
סוף אם

ועכשיו בסוף הלולאה, נפטרים מהמכתב שרק עבדתם עליו, כך שכשאתם מסתובבים בלולאה, האות הראשונה במשפט היא האות הבאה בסדר.

CurrText = מימין (CurrText, len (CurrText) - 1)
CurrCtr = CurrCtr + 1
לולאה

אז עכשיו המערך שלך מלא במספרים שנעים בין 0 לכל דבר אחר, כאשר כל אחד מהם מציין כמה פעמים אות זו נמצאה. אתה יכול להציג אותם בכל דרך שתרצה. אם רצית להשתמש בלולאה ובפונקציית ה- CHR המציגה את האות שיש לה קוד ASCII מסוים, אתה יכול לעשות:

עבור CurrLtr = 1 עד 26
response.write "המכתב"
CurrAscii = CurrLtr + 64
CurrLtrA = chr (CurrAscii)
response.write CurrLtrA & "נמצא"
response.write LetterCount (CurrLtr) וזמנים.
"
הבא

הקפד לעצור בפורומים שלנו או לכתוב אם יש לך שאלות!

מבוא ל- ASP Ebook הורד ספר אלקטרוני זה כדי לקבל את כל מה שאתה צריך לדעת על לימוד ASP - מ הדרכה שלב אחר שלב לרשימות פונקציות, קוד לדוגמה, שגיאות ופתרונות נפוצים, ועוד ועוד! 101 עמודים.

הוראות וידאו: לימוד אקסל שיעור 11 - נוסחאות פונקציות COUNT + COUNTA (נוסחאות ספירה) (אַפּרִיל 2024).