С наступающим Новым годом! Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
xXapokalypsesXx
0 / 0 / 0
Регистрация: 25.10.2015
Сообщений: 36
1

Собственная процедура/функция которая возвращает код символа

30.11.2015, 03:59. Просмотров 824. Ответов 1
Метки нет (Все метки)

Помогите пожалуйста создать собственную процедуру/функцию которая возвращает код символа.
Вводим: символ
Получаем: число

Стандартные функции (например: ord) нельзя использовать.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.11.2015, 03:59
Ответы с готовыми решениями:

Собственная процедура/функция которая возвращает значение символа за его кодом
Помогите пожалуйста создать собственную процедуру/функцию которая возвращает значение символа за...

Собственная процедура/функция которая возвращает предыдущий символ с кодовой таблицы
Помогите пожалуйста создать собственную процедуру/функцию которая возвращает предыдущий символ с...

Собственная процедура/функция которая превращает строчную букву в прописную
Помогите пожалуйста создать собственную процедуру/функцию которая превращает строчную букву в...

Написать функцию, которая возвращает количество появлений заданного символа в строке символов
Требуется аписать функцию,которая возвращает кол-во появлений заданного символа в строке символов...

Процедура / функция, которая заполняет три вектора разной длины
Здравствуйте! Нужно написать процедуру / функцию, которая заполняет три вектора разной длины. До...

1
bormant
Модератор
Эксперт Pascal/DelphiЭксперт NIX
4164 / 2754 / 2179
Регистрация: 22.11.2013
Сообщений: 7,688
30.11.2015, 09:49 2
Лучший ответ Сообщение было отмечено xXapokalypsesXx как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
function MyChr(n: Byte): Char;
begin
  MyChr:=Char(n);
end;
 
function MyOrd(c: Char): Byte;
begin
  MyOrd:=Byte(c);
end;
 
function MyPred(c: Char): Char;
begin
  MyPred:=Char(Byte(c)-1);
end;
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
30.11.2015, 09:49

Процедура и функция: Описать процедуру constr (A,B,C,D), которая по матрицам A, B и C типа table1 строит следующую матрицу D типа table2
type table1=array of integer; table2=array of integer; Описать процедуру constr...

Процедура и функция: Функция определения максимальной цифры числа
напишите программу,которая с помощью функции определяющей максимальную цифру числа выводит на экран...

Написать функцию которая возвращает True, если есть пара чисел, которая удовлетворяет условие
Есть массив: arr : array of Integer; Заполненный случайными числами от -32,768 до 32,767. ...


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

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

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