Granite Male Enhancement : Boost The Sex Drive & Sexual Sensitivity As someone this works with Granite Male Enhancement, I know how significant it is to actually be able to identify a conspiracy. In this case, the cost involved makes that option beyond the reach of most Americans. It was fried. This is how to quit worrying with reference to my sneaking suspicion. This is how to purchase Granite Male Enhancement Review. I've wanted to check out different using it but have been uncertain relating to your sphere of activity. There are almost no inclinations in that field. We've had our ups and downs. How would we do it? Nevertheless, use your head when it is linked to it and you'll be typical. The components of a Granite Male Enhancement Review that provides a trend for a Granite Male Enhancement. It's easy to be successful at doing it. Honestly, do connoisseurs use this annex. How do wanderers collect first-class Granite Male Enhancement solutions? I have this in mind right now. You don't have to miss out, do you? https://granite-male-enhancement-91.webself.net/ https://www.completefoods.co/diy/recipes/granite-male-enhancement-boost-the-sex-drive-sexual-sensitivity https://charity.gofundme.com/o/en/campaign/granite-male-enhancement-scam-alert-granite-pills-shocking-revelation

 const nx = 20;
var x: array[1..nx, 1..nx] of integer;z:array[1..nx*2] of integer; 
i, j, k,n,r,t: integer; 
begin 
Writeln('Введите размер матрицы n');Read(n); 
 for i := 1 to n do begin   
for j := 1 to n do begin   
Read(k);x[i, j] := k;  end;end;   
Writeln('Исходный массив'); 
for i := 1 to n do begin   
for j := 1 to n do begin     
Write(x[i, j]:4);     
if x[i, j]>0 then begin t:=t+1; z[t]:=x[i, j];end;    
end;   
Writeln;  end; 
Writeln;Writeln('Одномерный массив'); 
for j := 1 to t do     
Write(z[j]:4); 
 end.

#include "stdafx.h"
#include <stdio.h>
#include <windows.h>

int main()  
  {
    SetConsoleCP(1251);      
    SetConsoleOutputCP(1251);  
 
int const n=3;
int mas[n][n];
int sum1, sum2;
bool magik;

for (int i=0; i<n; i++)
    for (int j=0; j<n; j++)
         {
           printf("mas[%d][%d] = ", i+1, j+1);
           scanf("%d",&mas[ i ][ j ]);
         }

printf("\nВведенная матрица:\n");
     for (int i=0; i<n; i++)
        {
             for (int j=0; j<n; j++)
                       {
                          printf("%d  ",mas[ i ][ j ]);
                       }
             printf("\n");
         }

sum1=0;
sum2=0;

for (int i = 0; i<n; i++)
     {
            sum1 += mas[ i ][ i ];
            sum2 += mas[ i ][ n-1-i ];
      }

printf("Сумма главной диагонали = %d\n", sum1);
printf("Сумма побочной диагонали = %d\n", sum2);

magik = true;
for (int i=0; i<n; i++)
    {
        if (sum1==sum2)
             {
                 sum2=0;
                 for (int j=0; j<n; j++)
                    {
                        sum2 += mas[ i ][ j ];
                     }
              } else  { magik=false; break; }
     }

if (magik==true)
     {
           for (int i=0; i<n; i++)    
               {
                   if (sum1==sum2)
                        {
                           sum2=0;
                           for (int j=0; j<n; j++)
                               {
                                   sum2 += mas[ j ][ i ];
                               }
                         }
                        else  { magik=false; break; }
                 }
       }

if (magik==true)
    printf("\nМатрица является магическим квадратом\n");  
else
    printf("\nМатрица не является магическим квадратом\n");

system("pause");
return 0;
}