вывести через пробел номера буквГде номера букв подходят их номерам в

Вывести через пробел номера букв
Где номера букв соответствуют их номерам в алфавите
А - 1, B - 2 и т.д.

Задать свой вопрос
1 ответ
Var
    i: integer;

begin
    for i := 1 to 26 do
        write(chr(i + 64), '-', i, ' ');
end.
Коля
в зависимости от кодировки сдвиг может быть и иной
Анастасия Крейнгель
мне надо через функции ord,chr.
Диана
и что не так?
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт