Определите значение переменной c после выполнения следующего фрагмента программы, в котором a, b и с – переменные вещественного (действительного) типа. В ответе укажите одно число – значение переменной с.

Допустим, массив уже задан, поэтому его ввод писать не буду. Kol - количество элементов массива

var

 mas, mas_ob: array[0..999] of integer;

 i, kol_null, sum, sum_nech, sum_ch, pp, i1, kol, max: integer;

begin

 kol_null := 0;

 sum := 0;

 sum_nech := 0;

 sum_ch := 0;

 i1 := 0;

 max := -10000;

 for i := 0 to kol do  

 begin  

   if mas[i] <> 0 then kol_null += 1; //2

   sum += mas[i]; //3

   if mas[i] mod 2 <> 0 then sum_nech += mas[i];//4

   if mas[i] mod 2 = 0 then sum_ch += mas[i];  //5

   if mas[i] < 0 then mas[i] := abs(mas[i]);  //6

   if mas[i] mod 21 = 0 then mas[i] := 1; //7

   if mas[i] > max then max := mas[i]; //11

 end;  

 pp := mas[0];//8

 mas[0] := mas[kol]; //8

 mas[kol] := pp;//8

 for i := kol downto 0 do //10

 begin

   mas_ob[i] := mas[i];

   i1 += 1;

 end;

 writeln('Количество ненулевых элементов: ', kol_null);

 writeln('Сумма всех элеметов: ', sum);

 writeln('Сумма нечетных элеметов: ', sum_nech);

 writeln('Сумма четных элеметов: ', sum_ch);

 writeln('Максимальный элемент: ', max);

end.

#include <iostream>

#include <iomanip>

using namespace std;

int main()

{

 double a, b, x, y;

 cout << setw(10) << "a" << setw(10) << "b" << setw(10) << "x" << setw(10) << "y\n";

 for (a = 0; a <= 2.5; a += 0.5) {

   for (b = -1.5; b <= 0; b += 0.5) {

     x = (2 * b + 0.3) / (a + b);

     if (x >= -0.5)

       y = b / sqrt(x + 5);

     else

       y = a / sqrt(x + 5);

     cout << fixed << setw(10) << setprecision(3) << a;

     cout << fixed << setw(10) << setprecision(3) << b;

     cout << fixed << setw(10) << setprecision(3) << x;

     cout << fixed << setw(10) << setprecision(3) << y;

     cout << "\n";

     //cout << fixed << setw(15) << setprecision(3) << a << " " << b << " " << x << " " << y << "\n";

   }

 }

}

Объяснение: