1)сколько продуктов в таблице имеют содержание жиров больше, чем содержание белков, и при этом их калорийность меньше 100 ккал. 2) каково наименьшее ненулевой содержание жиров в продуктах с содержание белков больше 20г. с формулами - таблица

вот в файле все уже сделал

Прикрепил исправление в виде скриншота и текстового документа с программой. var    a: array[1..6,1..6] of integer;   x: array[1..6] of byte;   i,j,n: byte;   sum: longint;     begin        writeln('введите кол-во строк n: ');   readln(n);   sum: =0;   writeln ('введите матрицу a: ') ;     for i: =1 to n do    begin    for j: =1 to n do      begin         writeln('введите элемент номер ',i,': ',j);       readln(a[i,j]);             sum: =sum+a[i,j];       if (a[i,i])> (a[i,j]) then x[i]: =0              else x[i]: =1;               writeln;       end;         end;     writeln ('полученный массив');     for i: =1 to n do     write(x[i]: 2);   writeln; writeln('сумма всех элементов матрицы = ', sum); readln; end.

вфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфы

Объяснение:

вфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфывфывфывфыфвывфы