Сократить 1 отрицание (x+отр((x*y)) 2).отр(x*y)+отрx+y+z 3).a*c+a+a*отрb+отрc*a 4).отр( отрx*отрy)+отр x

1) отр(х+отр(х*у))=отр(х+отр(х)+отр(у))=отр(1+отр(у))=отр(1)=0

 

2) отр(ху)+отр(х)+у+z=отр(х)+отр(у)+отр(х)+у+z=отр(х)+1+z=1

 

3)а*с+а+а*отрв+отрс*а=а+а*отрв=а

 

4)отр(отрх*отру)+отрх=х+у+отрх=1 

Const   nm = 20;   nn = 20; var   a: array[1..nm, 1..nn] of integer;   b: array[1..nm] of integer;   i, j, m, n, mina: integer; begin   write('введите число строк и столбцов массива: '); readln(m,n);   randomize;   writeln('исходный массив');   for i : = 1 to m do   begin       for j : = 1 to n do       begin           a[i, j] : = random(101) - 50;           write(a[i, j]: 4)       end;       writeln   end;     for i: =1 to m do   begin       mina: =32767;       for j: =1 to n do if mina> a[i,j] then mina: =a[i,j];       b[i]: =mina   end;     writeln('сформированный массив');   for i: =1 to m do write(b[i]: 4);   writeln end. тестовое решение: введите число строк и столбцов массива: 6 5 исходный массив   46 -32  -6  20  36   -2 -41 -10 -42  26   -33  16 -25    9  46   -36  20 -50  36 -37   -41  16  34  -8    9   38 -36 -14 -18 -33 сформированный массив   -32 -42 -33 -50 -41 -36

Var a, b, c: integer; begin write('введите углы a, b, c > > '); readln(a, b, c); if a+b+c = 180 then if (a> 0) and (b> 0) and (c> 0) then begin if (a=b) and (b=c) then writeln('равносторонний '); if ((a=b) and (a< > c)) or ((b=c) and (b< > a)) or ((a=c) and (c< > b)) then  writeln('равнобедренный '); if (a< > b) and (b< > c) and (a< > c) then  writeln('разносторонний '); if (a=90) or (b=90) or (c=90) then writeln('прямоугольный '); if (a> 90) or (b> 90) or (c> 90) then writeln('тупоугольный '); if (a< =89) and (b< =89) and (c< =89) then writeln('остроугольный ') end else writeln('углы должны быть больше 0') else writeln('сумма углов не равна 180 градусам'); end.