подсчет буквенных символов в выражении, не соображу.... |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
подсчет буквенных символов в выражении, не соображу.... |
-Dimanez- |
Сообщение
#1
|
Гость |
задание
составить программу подсчета количества буквенных символов в выражении дело состоит в том - не могу понять как организовать сам подсчет символов .. вот,например, кусок программы, где находим символы в ыражении ( поидее), а что делать дальше не знаю(( ... for i:=1 to length(str) do for x:='A' to 'Z' do if k[x] in ['A','Z'] then n:=n+1 ... итд или вот буквенные символы( заглавные латинские) находятся в кодировке от 35 до 90.... здесь совсем темный лес... for x:='A' to 'Z' do if x>=35 and x<=90 {здесь мне при полной прогрмме выдавал ошибку[x<=90]. хотя даж не понимаю как можноприсвоить так сказать символьной переменной Х число...не используя при этом подпрограмм, хотя при х=> 35 прокатило...). ... одним словом - ужас.. думаю.что здесь полный бред написан, но все же,надеюсь на помощь.... |
neic |
Сообщение
#2
|
Студент 3-к группы (ИГТК) Группа: Пользователи Сообщений: 32 Пол: Мужской Реальное имя: Артём Репутация: 1 |
Может всё таки так будет правильнее:
If k[x] in ['A'..'Z','a'..'z'] then -------------------- Жизнь - это лестница. Когда одна ступень проваливается, 2-ая нога находиться на второй ступеньке, а значит есть и второй шанс... ©
|
Dimanez |
Сообщение
#3
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Репутация: 0 |
помогите исправить ошибку....
смысл вот он!... а тут ошибка((..туго с исправлением... type выводит 41 ошибку.... Сообщение отредактировано: Dimanez - |
nopsrer |
Сообщение
#4
|
Новичок Группа: Пользователи Сообщений: 15 Пол: Мужской Реальное имя: Максим Репутация: 0 |
Функция ord возращает порядковый номер символа в таблице кодов аски.
Символы A..Z идут под номерами от 65 до 90, a..z от 97 до 122 var s: string; Сообщение отредактировано: nopsrer - |
termin |
Сообщение
#5
|
Группа: Пользователи Сообщений: 7 Пол: Мужской Репутация: -1 |
i:=1;
while (i<=length (str)) do begin if (S[i] in ['a'..'z','A'..'Z']) then inc (count); inc (i); end; WriteLn ('count=',count) Если не ошибся, то типо чото того должно быть. |
volvo |
Сообщение
#6
|
Гость |
Буквы могут, кстати, быть не только латинскими...
|
Dimanez |
Сообщение
#7
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Репутация: 0 |
угу....препод говрил...таблицу показывала с символами....там вопщем,не только буквы,а и символы...
было бы не плохо в FAQ'e такую таблицу вставить) Сообщение отредактировано: Dimanez - |
andriano |
Сообщение
#8
|
Гуру Группа: Пользователи Сообщений: 1 168 Пол: Мужской Реальное имя: Сергей Андрианов Репутация: 28 |
Трудно, конечно, что-то говорить, не зная, о какой таблице идет речь, но, вероятно, эта таблица может быть получена простейшей программой:
var(кстати, совсем недавно я ее где-то уже приводил. Возможно и на этом форуме) |
nopsrer |
Сообщение
#9
|
Новичок Группа: Пользователи Сообщений: 15 Пол: Мужской Реальное имя: Максим Репутация: 0 |
Таблица кодов ASCII
Эскизы прикрепленных изображений |
andriano |
Сообщение
#10
|
Гуру Группа: Пользователи Сообщений: 1 168 Пол: Мужской Реальное имя: Сергей Андрианов Репутация: 28 |
Это не ASCII, это сканкоды клавиатуры.
|
Текстовая версия | 23.12.2024 20:53 |