компьютерный форум
Вернуться   Компьютерный форум > Программирование и вебстроительство > Программирование

Ответ
 
LinkBack Опции темы Опции просмотра
Старый 02.07.2005, 21:01   #1
Пользователи
 
Регистрация: 02.07.2005
Сообщений: 2
По умолчанию

Как преобразовать текст в числа?
Пример:
А=1, Б=2, В=3 и.т.д




ElementalMaster вне форума  
Digg this Post!Bookmark Post in Technorati
Ответить с цитированием
02.07.2005, 21:01
Техник
реклама
По умолчанию

Старый 04.07.2005, 01:38   #2
Пользователи
 
Регистрация: 11.10.2004
Сообщений: 607
По умолчанию

Смотря где... Например в дельфи и куликсе StrToInt или StrToFloat. причем вся текстовая часть удалится, а числа станут числами.

А в паскале по моему есть функция (int)($text)
BooMeR вне форума  
Digg this Post!Bookmark Post in Technorati
Ответить с цитированием
Старый 04.07.2005, 06:32   #3
Пользователи
 
Регистрация: 02.07.2005
Сообщений: 2
По умолчанию

мне какраз нужно чтобы текст заменился на цифры
Пример:
абвгд = 1+2+3+4+5
ElementalMaster вне форума  
Digg this Post!Bookmark Post in Technorati
Ответить с цитированием
Старый 04.07.2005, 22:19   #4
Пользователи
 
Регистрация: 10.09.2004
Сообщений: 985
По умолчанию

Зделай масив соответствий и парсь строку.
vxk7m вне форума  
Digg this Post!Bookmark Post in Technorati
Ответить с цитированием
Старый 05.07.2005, 07:57   #5
ser
Пользователи
 
Регистрация: 14.08.2004
Сообщений: 435
По умолчанию

У ASCII символов есть код к примеру
"A" (английское эй) 65
"B" (английское би) 66
если хочешь перевести в соответствии A=1, B=2 ...
то делаешь так
Код:
var
 *symbol : char;
 *code * *: integer;
begin
 *for i:='A' to 'Z' do begin
 * *code = byte(symbol)-64; // тут точно не помню, если byte не работает то пробуй ord() или как там преобразование в число с символа
 * *writeln(code);
 *end;
end.
ser вне форума  
Digg this Post!Bookmark Post in Technorati
Ответить с цитированием
Старый 05.07.2005, 08:31   #6
Пользователи
 
Регистрация: 11.10.2004
Сообщений: 607
По умолчанию

То алл
в дельфи все просто:
Код:
var:
i:double;
s:string;

s:='Ляля5,680маза';
i:=StrToFloat(s);
// i = 5.680
:clap:
BooMeR вне форума  
Digg this Post!Bookmark Post in Technorati
Ответить с цитированием
Старый 05.07.2005, 20:49   #7
Пользователи
 
Регистрация: 10.09.2004
Сообщений: 985
По умолчанию

Цитата:
[b]
var
symbol : char;
code* * : integer;
begin
for symbol:='A' to 'Z' do begin
* code = ord(symbol)-64; // тут точно не помню, если byte не работает то пробуй ord() или как там преобразование в число с символа
* writeln(code);
end;
end.
Зделай с етого процедурку и будет тебе щастье =)
vxk7m вне форума  
Digg this Post!Bookmark Post in Technorati
Ответить с цитированием
Старый 06.07.2005, 09:21   #8
ser
Пользователи
 
Регистрация: 14.08.2004
Сообщений: 435
По умолчанию

2 vxk7m,
Да так оно и есть, сенькс что подправил
2 BooMeR,
Читай внимательно чего спрашивают
ser вне форума  
Digg this Post!Bookmark Post in Technorati
Ответить с цитированием
Ответ


Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Вкл.



Текущее время: 20:57. Часовой пояс GMT.


Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd. Перевод: zCarot
Content Relevant URLs by vBSEO 3.5.0 RC2