Кто может построить блок схему? int main() { setlocale(LC_ALL, "rus");
int a, k = 0, mas[15], mas1[15];
int printf(mas[15]);
srand(time(0));
for(int i = 0; i < 15; ++i)
mas[i] = 1 + rand() % 40;
for(int i = 0; i < 15; ++i)
if((mas[i]%2 == 0))
mas1[k++] = mas[i];
while(k < 15)
mas1[k++] = 0;
std::cout << "Случайный массив" << std::endl;
for(int i = 0; i < 15; ++i)
std::cout << mas[i] << " ";
std::cout << std::endl;
std::cout << "Четные числа: " << std::endl;
for(int i = 0; i < 15; ++i)
std::cout << mas1[i] << " ";

std::cout <<" "<< std::endl;

system("PAUSE");

return 0;

}

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
  var n:=ReadInteger('n=');
  var a:=MatrixRandom(n,n,10,99);
  var s:=0;
  var k:=0;
  for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do Print(a[i,j]);
    Writeln;
    if a[i,i].IsEven then begin s+=a[i,i]; Inc(k) end;
    end;
  if k>0 then Writeln('S=',s/k:0:2)
  else Writeln('На главной диагонали нет четных элементов')
end.

Тестовое решение
n= 8
63 13 33 90 25 21 87 91
88 88 48 13 30 59 81 27
73 23 76 77 52 19 33 97
53 87 13 74 17 35 61 70
77 96 51 61 82 33 63 22
39 88 84 54 88 73 74 69
76 26 69 14 45 80 70 54
80 36 47 38 18 22 84 62
S=75.33

Важное замечание: Программа будет работать только при компиляции компилятором, поддерживающим стандарт C99.

#include <stdio.h>

#include <stdlib.h>

int compare(const int* A, const int* B); // компаратор для qsort

int main()

{

   int N;

   

   printf("Введите размер массива: ");

   scanf("%d", &N);

   

   int

       arr[N],

       sum = 0,

       number = 0;

   

   

   for(int i = 0; i < N; i++)

       scanf("%d", &arr[i]);

       

   for(int i = 0; i < N; i++)

       printf("%d ", arr[i]);

   printf("\n");

   for(int i = 0; i < N; i++)

   {

       if(arr[i])

           sum += arr[i];

       if((arr[i] % 3 == 0) && (i % 2 == 0))

           number += 1;

   }

   

   qsort(arr, N, sizeof(int), compare);

   

   for(int i = 0; i < N; i++)

       printf("%d ", arr[i]);

   

   

   printf("\nСумма положительных элементов = %d\n\

   количество элементов, имеющих четные порядковые номера и являющиеся нечетными числами = %d", sum, number);

   return 0;

}

int compare(const int* A, const int* B)

{

   return *A - *B;

}