Раскодируйте сообщение по таблице ASCII? если символ m имеет код 109 . Код 84 111 114 110 97 100 111

// PascalABC.NET 3.3
// Cборка 1590 от 03.12.2017

begin
  var (dr,mr,gr):=ReadInteger3('Введите день, номер месяца и год рождения->');
  var (ds,ms,gs):=ReadInteger3('Введите какой день, номер месяца и год на данный момент->');
  var kol:=gs-gr;
  if ((ms<mr) and (ds<dr)) or ((ms=mr) and (ds<dr)) then dec(kol);
  Println('Количество лет->',kol);
end.

Пример(1):
Введите день, номер месяца и год рождения-> 2 1 1920
Введите какой день, номер месяца и год на данный момент-> 18 9 2013
Количество лет-> 93 

Пример(2):
Введите день, номер месяца и год рождения-> 31 12 2001
Введите какой день, номер месяца и год на данный момент-> 1 1 2033
Количество лет-> 31 

Обычный массив: берем список покупок. Допустим, нужно купить молоко, хлеб, яйца, чай и мороженое. Всего покупок: 5. И мы перебираем каждую покупку. В массиве можно записать как: array [1..5], так как 5 покупок. То же молоко под цифрой 1, значит это 1 элемент массива. Чай будет 4 элементом массива.
Двухмерный массив: берем многоквартирный дом. В доме 3 этажа, на каждом этаже 4 квартиры. Соответственно этаж можно приравнять как array [1..3,1..4] 1..3 это количество этажей, 1..4 это кол-во квартир. Если в доме 3x4=12 этажей, то получается 12 элементов массива.

Так же, элементы массива могут быть как одинаковыми, так и разными, но чаще второе. (Пример: дан массив с двумя элементами. Первый элемент равен 5, второй 33)

Создать массив в Pascal:
В var напишите x:array [y..z] of what
x - название массива
y - начальная цифра массива (обычно 1, так и представим)
x - последняя цифра массива (представим как 10)
what - тип (integer, real и т.д.)

Найти значение массива и редактировать его:
a:=x[4]
Данным действием мы присваиваем 4 элемент массива для a.
x[4]:=b
Данным действием мы присваиваем b для 4 элемента массива.

Если что-то непонятно, задайте вопрос в комментарий. Постараюсь объяснить именно то, что вам непонятно.