Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 18.10.2009, 20:42   #1
k1r1ch
ACM!
Форумчанин
 
Аватар для k1r1ch
 
Регистрация: 19.06.2009
Сообщений: 382
Вопрос Номер буквы в букву

Есть ли такая функция в паскале, чтобы из номера буквы в алфавите выдавала саму букву (русский алфавит)? Или придется самому писать?!
k1r1ch вне форума Ответить с цитированием
Старый 18.10.2009, 20:48   #2
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

char(192) = A...Я а..я 259 =я
все в этом диапазоне
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 18.10.2009, 21:19   #3
LeBron
Форумчанин
 
Регистрация: 10.10.2009
Сообщений: 680
По умолчанию

Код:
chr(x);
, где х - Ваше число.
Это для символа вообще. Если по номеру в определенном алфавите, то прибавляем "базу" этого алфавита-1 для букв АБВГ и "базу"+"длину"-1 для букв абвг. В нашем случае "база" 192. Фактически, база - номер в символьной таблице, с которого начинается алфавит.
LeBron вне форума Ответить с цитированием
Старый 18.10.2009, 21:20   #4
LeBron
Форумчанин
 
Регистрация: 10.10.2009
Сообщений: 680
По умолчанию

Цитата:
Сообщение от raxp Посмотреть сообщение
char(192) = A...Я а..я 259 =я
все в этом диапазоне
я = 255, логично, что код меньше 256.
LeBron вне форума Ответить с цитированием
Старый 18.10.2009, 21:31   #5
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,551
По умолчанию

В простейшем случае так:
Код:
C := Char (Byte ('A') + N - 1);
Arigato вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Заменить автоматически первую букву в ячейке на заглавную. agregator Microsoft Office Excel 2 02.07.2009 18:22
Вывод слов на определенную букву REztor Помощь студентам 12 22.03.2009 21:48
Получить букву CD-ROM'a Medyankin Помощь студентам 7 28.07.2008 09:44
Как определить букву диска? Борис2 Паскаль, Turbo Pascal, PascalABC.NET 2 06.12.2007 22:16