Вычислить, дописать программу на Паскале и составить блок схему: a :=40;

b :=10;

b := - a / 2 * b;

if a меньше b then

c :=b - a

else

c :=a - 2 * b;

Разрешение монитора определяет качество экрана. Разрешение определяется числом горизонтальных и вертикальных элементов изображения (пикселей), которые используются для формирования изображения на экране монитора. Обычно число пикселей предопределяется производителем графических карт и мониторов ПК. Самое больше число пикселей, поддерживаемое монитором и графической картой, называется максимальным разрешением. Пример максимального разрешения – 1 280 x 1 024, которое означает, что экран состоит из 1 280 горизонтальных пикселей и 1 024 вертикальных пикселей. Чем более высокое разрешение задано, тем четче отображается на экране изображение. Максимальное разрешение монитора ПК и число цветов, которое может отобразить монитор, определяется двумя факторами:
• возможности монитора;
• возможности графической карты, особенно объем встроенной памяти.
Требуются следующие ресурсы:
• компьютер с установленной ОС Windows XP.

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var (n,m):=ReadInteger2('Количество строк и столбцов в матрице:');
  Writeln('*** Исходная матрица ***');
  var rmatr:=MatrRandom(n,m,-99,99);
  rmatr.Println(4); Writeln(4*m*'-');
  var max:=rmatr.ElementsByRow.Max;
  var s:=0;
  foreach var row in rmatr.Rows do
    if row.Contains(max) then s+=row.Sum;
  Writeln('Сумма равна ',s)
end.

Пример
Количество строк и столбцов в матрице: 8 7
*** Исходная матрица ***
 -50 -48   6   5  54 -16  42
 -96 -23 -35  46 -39 -44 -15
   2 -67  99  50 -53  68 -61
 -77 -13 -76 -59  38 -20   4
  97 -82  -1  20 -81 -77  -2
 -51  87  34  -5  14 -60  91
 -53  24   2  98 -98  29 -84
  60  28  18  68   8  28 -73

Сумма равна 38