Как можно вывести на экран в Turbo Pascal с помощью операторов while и repeat: все двухзначные числа, у которых разница между старшей и младшей цифрами не превышает 1; все трехзначные числа, в которых хотя бы две цифры совпадают. Информатика 8 класс Циклы и управление потоком в Turbo Pascal Новый

Как можно в Turbo Pascal вычислить сумму наибольших значений элементов четных строк для массивов A (N1,M1), B (N2,M2) и C (N3,M3), применяя подпрограмму, желательно в виде функции? Информатика 11 класс Массивы и подпрограммы в Turbo Pascal Новый