Опишите: Константы:

MAX_COL - 100

MAX_ROW - 100

тип массив TRow как массив целых чисел из MAX_COL элементов (задано константой) элементов с индексами от 1 до MAX_COL;
тип массив TTable как массив из строк целых чисел (TRow) из MAX_ROW элементов (задано константой) элементов с индексами от 1 до MAX_ROW;
Количество элементов массива задается с клавиатуры (сначала строки, потом столбцы)
Организовать одномерный массив из целых чисел, равный количеству строк исходного массива.
Заполнить двумерный массив с клавиатуры.
Найти максимальный элемент в каждой строке и записать его в на соответствующее место одномерного массива.

В программе должны быть процедура заполнения одной строки, процедура вывода одномерного массива, а также функция нахождения максимума одной строки (т.е. одномерного массива).

Program z9;  Var a,del,del_2,i,j:integer; b,b_2: string;Begin  write('Введите число - '); readln(a);    del:= 5;  del_2:= 2;  i:= 0;  j:= 0;    while (a >= del) do  begin    if (a mod del = 0)       then       begin        b:= b + del + ' ';        i:= i + 1;      end;     del:= del + 10;  end;    while (a >= del_2) do  begin    if (a mod del_2 = 0)       then       begin        b_2:= b_2 + del_2 + ' ';        j:= j + 1;      end;     del_2:= del_2 + 2;  end;    writeln('Кол-во делителей заканчивающихся на 5 - ', i);  writeln(b);  writeln;  writeln('Кол-во делителей заканчивающихся на 2 - ', j);  writeln(b_2);  writeln;End.

Роль информатики в развитии общества чрезвычайно велика. Сегодня в мире нет ни одной отрасли науки и техники, которая развивалась бы столь же стремительно, как информатика. Каждые два года происходит смена поколений аппаратных и программных средств вычислительной техники. Фактически за последние годы роиизошла революция в области передачи, накопления и обработки информации. Эта революция, затрагивает и коренным образом преобразует все области человеческой жизни. Значительное увеличение возможностей компьютерной техники, развитие информационных сетей, создание новых информационных технологий приводят к радикальным изменениям во всех сферах общества: в производстве, науке, образовании, медицине и т.д. Народы развитых стран осознают, что совершенствование информационных технологий представляетсамую важную, хотя дорогостоящую и трудную задачу.