Создать массив из 4х элементов каждому элементу присвоить по букве из своего имени вывести на экран шийровку буквы (ее номер в алфавите)Я писала программу, но мне выдало ошибку "Нельзя преобразовать тип char к integerа программ...

Создать массив из 4х элементов каждому элементу присвоить по букве из своего имени вывести на экран шийровку буквы (ее номер в алфавите) Я писала программу, но мне выдало ошибку "Нельзя преобразовать тип char к integerа программу" Напишите что исправить.
Гость
Ответ(ы) на вопрос:
Гость
var     a: array [1..4] of char;     i: integer; begin     a[1] := 'S';     a[2] := 'I';     a[3] := 'M';     a[4] := 'A';     for i := 1 to 4 do         write(ord(a[i]) - 64, ' '); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы