вас мочь с заданиемна: Написать программу на Паскаль турбо
В двумерном массиве А[5, 8] найти минимальный элемент каждой из строк
и минимальный элемент каждого из столбцов. Для поиска минимального использовать подпрограмму, которая находит минимальной элемент в одной
строке, а для поиска максимального - функцию которая находит максимальный
элемент в одном столбце.

Program rok_ork_kok;var x,y:integer;        s:string;        c1,c2,c3:char; begin writeln('начать выполнение? Жмите ENTER!'); readln; repeat randomize; x:=random(4); if x = 1 then c1:='р'; if x = 2 then c1:='о'; if x = 3 then c1:='к';  x:=random(4); if x = 1 then c2:='р'; if x = 2 then c2:='о'; if x = 3 then c2:='к';   x:=random(4); if x = 1 then c3:='р'; if x = 2 then c3:='о'; if x = 3 then c3:='к'; s:=c1+c2+c3; writeln(s); until (s='кок') or (s='рок') or (s='орк') ; writeln('получили слово '+s); end.

Единственный разбить запись 1311 на два числа – это 13 и 11 (числа 131 и 311 не могут образоваться в результате сложения значений двух десятичных цифр)
2) Сумма первой и второй цифр должна быть наименьшей (тогда и число будет меньше!), она равна 11; тогда сумма значений двух последних цифр равна 13
3) Для того, чтобы всё число было минимально, числа, составленные из первых двух и последних двух цифр должны быть минимальными соответственно для сумм 11 и 13
4) Минимальное двузначное число, у которого сумма значений цифр равна 11, - это 29, с этих двух цифр начинается исходное четырёхзначное число
5) Сумма двух последних цифр – 13, минимальное двузначное число с такой суммой цифр – 49.

ответ: 2949