IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Паскаль ABC.Напишите программу:Расшифровывает слово ,поставив соответствующей цифре буквы.
Antohaa_955
сообщение 10.12.2011 21:03
Сообщение #1





Группа: Пользователи
Сообщений: 3
Пол: Мужской

Репутация: -  0  +


Здравствуйте!!!Пожалуйста помогите написать программу, которая расшифровывает слово,поставив соответствующей цифре букву.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
Дмитрий Ильин
сообщение 11.12.2011 9:40
Сообщение #2


Новичок
*

Группа: Пользователи
Сообщений: 31
Пол: Мужской
Реальное имя: Дмитрий

Репутация: -  0  +


Известно, что коды прописных (заглавных) букв латинского алфавита следуют в таблице непрерывно друг за другом. Коды строчных букв латиницы также следуют непрерывно друг за другом на расстоянии 32 символов от прописных (ниже по таблице).
Если ord('A') = 65, то ord('A')+32 = 97, и это код строчной буквы «а», то есть chr(ord('A')+32) = 'а'.
Напишите программу, в которой вы вводите прописную букву (только латиницу!), а получаете ее строчной эквивалент, и наоборот, по строчной букве получаете соответствующую прописную
Это из учебника,
X:= 'L' ;
Функция Ord возврашает (указывает) код символа,занесенного в переменную
т.е. при выводе переменной Х на экран вы увидете ее код соответствующий таблице ASCII.
А функция Chr наоборот,указывает символ,по введенному коду,т.е. если вы ввели символ L,то на экране высветится его Код в таблице ASCII

Вот я написал программу для преобразования из кода в буквы,вроде как вы просили,если что не так,извините)

Код
program home_1;
uses crt;
var a,b,c,d:integer;
    a1,b1,c1,d1:char;
begin
readln(a);
readln(b);
readln( c );
readln(d);
  
a1:=chr(a);
b1:=chr(b);
c1:=chr( c  );
d1:=chr(d);
writeln(a1,' ',b1,' ',c1,' ',d1,' ','Нажмите ENTER ...');
readln


end.

Тут символ "С" сливается в знак ( а сполеры ставить не умею,поэтому держите сам файл PascalABC,откроейте им вложенный файл.

Сообщение отредактировано: Дмитрий Ильин - 11.12.2011 14:57


Прикрепленные файлы
Прикрепленный файл  Home_1.pas ( 261 байт ) Кол-во скачиваний: 345


--------------------
Каждый программист - Творец (с)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 22.06.2025 20:43
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"