Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
rastamanxox
0 / 0 / 0
Регистрация: 16.05.2009
Сообщений: 7
1

Заменить буквы

16.05.2009, 14:18. Просмотров 921. Ответов 2
Метки нет (Все метки)

Необходимо написать программу, которая бы заменяла буквы введенного слова на соответствующие цифры в алфавите (например, a-1, b-2, c-3 и т.д.). Если кто-то сталкивался с подобной задачей, помогите, плз!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.05.2009, 14:18
Ответы с готовыми решениями:

Дана строка S, удалить из нее все буквы (а), а буквы (о) заменить на 0
Дана строка S, удалить из нее все буквы (а), а буквы (о) заменить на 0. Сказали, что через...

Напишите программу, которая заменяет в символьной строке все буквы a на буквы b , a буквы A на буквы B
Здравствуйте,помогите пожалуйста написать программу .Напишите программу, которая заменяет в...

Строки. Заменить все буквы а на в и в на а
Составить алгоритм замены какой-нибудь литерной величинывсех букв а на буквы в и всех в на а.

Типизированный файл. Заменить буквы
Имеется типизированный файл, элементами которого являются отдельные буквы, составляющие ...

Заменить цифры на буквы в алфавитном порядке
дана строка в ней цифры, заменить цифры на буквы в алфавитном порядке. Добавлено через 29 минут...

2
Puporev
Модератор
54711 / 42119 / 29083
Регистрация: 18.05.2008
Сообщений: 99,407
16.05.2009, 15:19 2
Лучший ответ Сообщение было отмечено rastamanxox как решение

Решение

например, a-1, b-2, c-3 и т.д.
А что делать с заглавными, или с русскими? Лень задание нормально написать? Какого тогда вопрос задаешь?

Добавлено через 5 минут 1 секунду
Вот для маленьких английских.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
var s,s1:string;
    i,t:integer;
begin
clrscr;
write('Введите слово: ');
readln(s);
s1:='';
for i:=length(s) downto 1 do
if s[i] in ['a'..'z'] then
 begin
  t:=ord(s[i])-96;
  str(t,s1);
  delete(s,i,1);
  insert(s1,s,i);
 end;
write(s);
readln
end.
Добавлено через 53 секунды
Как перводить другие буквы, смотри здесь.
Написать функцию, которая возвращает N правых символов в виде строки
1
rastamanxox
0 / 0 / 0
Регистрация: 16.05.2009
Сообщений: 7
16.05.2009, 15:26  [ТС] 3
Спасибо, о заглавных и русских ничего не сказано, следовательно, Ваш код наверное и является верным для поставленного условия. Еще раз спасибо!
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.05.2009, 15:26

Заменить все буквы a на q в строке из 25 символов
Срочно нужна помощь, не допускают до сессии!!! Нужно написать программу: 1. Заменить все буквы...

Заменить в массиве, например, все буквы s на m и S на M соответственно
Дан символьный массив, заполненный буквами латинского алфавита (строчными и прописными). Заменить в...

Заменить все гласные буквы произвольным символом
Дана произвольная строка Заменить все гласные буквы произвольными символом


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru