Составить программу наполняющую массив кодами знаков слова введенных с клавиатуры В

Составить программку наполняющую массив кодами знаков слова введенных с клавиатуры В ABC-паскаль.net

Задать свой вопрос
Лилия Погрешаева
В ABC-паскаль
1 ответ
Const N = 10;
var A: array[1..10] of integer;
i, len: integer;
s: string;
begin
write('Введите слово: ');
readln(s);
len := length(s);
for i := 1 to len do begin
A[ i ] := ord(s[i]);
writeln('Код знака ', s[ i ], ': ', A[ i ]);
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт