Дана строка. Найдите в этой строке предпоследнее вхождение буквы f, и выведите индекс этого вхождения. Если буква f в данной строке встречается меньше нужного кол-ва раз, выведите строку "мало букв f".

Var A: array[1..20, 1..20] of integer;
m, n, k, i, j: integer;
begin
randomize;
repeat
write('Введите число столбцов и строк через пробел: ');
readln(n, m);
until (n in [1..20]) and (m in [1..20]);
for i := 1 to m do begin
for j := 1 to n do begin
A[ i, j ] := random(19) - 9;
write(A[i, j]:5);
end;
if odd(i) then writeln(' ') else writeln;
end;
writeln;
writeln('Заменяем отрицательные числа на нули, положительные - на единицы:');
writeln;
for i := 1 to m do begin
for j := 1 to n do begin
if A[ i, j ] <= 0 then A[ i, j ] := 0
else A[ i, j ] := 1;
write(A[i, j]:5);
end;
if odd(i) then writeln(' ') else writeln;
end;
end.

p.s: не совсем понятно последнее задание - вывести нижнюю треугольную матрицу. Сделать новую или что?

(АСУ) , совокупность математических методов, технических средств (ЭВМ, средств связи, устройств отображения информации и т. д.) и организационных комплексов, обеспечивающих рациональное управление сложным объектом (процессом) в соответствии с заданной целью. АСУ состоит из основы и функциональной части. В основу входят информационное, техническое и математическое обеспечение. К функциональной части относят набор взаимосвязанных программ, автоматизирующих конкретные функции управления (планирование, финансово-бухгалтерскую деятельность и др.). Различают АСУ объектами (технологическими процессами - АСУТП, предприятием - АСУП, отраслью - ОАСУ) и функциональными автоматизированными системами, напр., проектирования, расчетов, материально-технического и др. обеспечения.