В кодировке ASCII прописные латинские буквы от A до Z последовательно кодируются целыми числами от 161 до 186 включительно. Декодируйте последовательность чисел 183, 169, 174, 164, 175, 183, 179 и запишите получившееся слово, не разделяя ничем его буквы. Латинский алфавит (для справки): . *

program a1;
var
a: array [1..15] of integer;
a2: array [1..15] of integer;
Mas1:integer;
Mas2:integer;
Raz:integer;
i:integer;
begin
//Подключаем датчик случайных чисел
randomize;

//Цикл заполняющий массивы и нахождение сумм элементов масива
for i:=1 to 15 do
begin
a[i]:=random(100);
a2[i]:=sqr(a[i])-a[i];
Mas1:=Mas1+a[i];
Mas2:=Mas2+a2[i];
end;

//находим разницу массивов
raz:=mas1-mas2;

//Выводим на экран 1ый массив
write('Первый массив: ');
for i:=1 to 15 do
begin
write(a[i],'|')
end;
writeln('');

//Выводим на экран 2ой массив
write('Второй массив: ');
for i:=1 to 15 do
begin
write(a2[i],'|')
end;
writeln('');

//Выводим на экран разность массивов
write('Разность сумм элементов массива:', raz);
writeln('');
end.

зачем вам такое старье?

1) И что с этим надо сделать. Да ворд может создавать таблицы, они имеют какието границы. Со связями не стыкалась но наверно и такое есть. Может затянуть к примеру таблицу из екселя или аксеса

2)выделили нужные ячейки

  по горизонтали - есть кнопочкина панели(лево, право, по центру)

  по вертикали - пр кнопка-свойства ячеек - выравнивание- по вертикали-выбрать нужный вариант

так же можно обьеденять ячейки, менять направление текста, переносить или не переносить слова на новую строку, и тд