Как вывести символ используя десятичного номера?

[forged]

Скажите пожалуйста как вывести символ с помощью десятичного номера?
например как в это программе:
--------------------------------------------------------------------------
program abc;
uses crt;
var
a,b,c:string;
BEGIN
a:='123';
writeln(a[0]);
readln;
end.
--------------------------------------------------------------------------
Только в ней чтоб вывести символ я пишу a:='123'.
А как вывести символ по другому чтоб программа была по меньше, а то если выводить символ с порядковым номером 251 будет тяжело.
Скажите может какой оператор есть? М?

[s-andriano]

Непонятно, что именно Вам нужно.
Попытайтесь как-нибудь иначе сформулировать условие.

Следующая программа выводит в точности то же самое, что и Ваша, но, как Вы и хотели - короче:

BEGIN
  writeln(#3);
  readln;
end.

[Poma][a]

WriteLn(Chr (n))

[s-andriano]

Poma][a, а при чем здесь десятичный номер?

[Poma][a]

s-andriano, я не совсем понял суть Вашего вопроса?

WriteLn (Chr(3))

Эквивалентен

WriteLn (#3)

[Sciv]

Чего-то вы напридумывали оба. Я так понял, аффтару надо вывести символ строки по его номеру в строке. Только вот никак вкурить не могу, чего тяжелого в обращении к 251 символу?

И кстати говоря, уважаемый топикстартер, в Вашем примере ничего на экран не выведется - в паскале строковый массив с единицы считается, а не с нуля.

[Poma][a]

Вашем примере ничего на экран не выведется

Не соглашусь
Чтобы это проверить мне пришлось вырубить все проверки в компиляторе => код не ахти..

Давайте вспомним способ кодировки строк. Нулевой байт - размер строки! Но т.к. строка это размер символов, то Length(s) = Ord(s[0])

Поэтому в данном случае программа выведет Chr(3).

Я так понял, аффтару надо вывести символ строки по его номеру в строке.

Не) Нужно вывести символ с ASCII кодом.

[Sciv]

Нулевой байт - размер строки!

Точно! Спасибо, Ромаха, поправил, конечно размер строки. Ну тогда ответ на вопрос, есть ли оператор - это функция length(s).

Блин, вот теперь я тоже запутался, чего нужно аффтару

[Poma][a]

Ну тогда ответ на вопрос, есть ли оператор - это функция length(s).

Мне кажется ответ не на тот вопрос
Автор собирается выводить символы, использую длину строки! Поэтому и идея вывести 251 символ ТС не очень нравится.

[s-andriano]

А тут никто точно не понимает, что именно нужно автору.
Варианты:
- определенный символ из строки,
- длину строки,
- символ с кодом равным заданному числу,
- как записать в коде вывод символа, используя его код в десятичном представлении.