Загрози інформаційній безпеці. Захист від шахрайства з платіжними кар сками.​

Const   N = 7;Var   A:array[1..N,1..N] of integer;   i,j:integer;BeginFor i:= 1 to N do    Begin    For j:= 1 to N do        Begin        A[i,j]:=random(21)-10;        Write(A[i,j]:3,' ')        End;    WriteLn    End;WriteLn;For i:= 1 to N div 2+(N mod 2) do    Begin    For j:= 1 to N do        Begin        if (j<=N div 2+i)and(N div 2-i+(N mod 2)<j) then A[i,j]:=99;        Write(A[i,j]:3,' ')        End;    WriteLn;    End;For i:= (N div 2)+(N mod 2)+1 to N do    Begin    For j:= 1 to N do        Begin        if (i-N div 2-1<j)and(j<=N+N div 2+1-i) then A[i,j]:=99;        Write(A[i,j]:3,' ')        End;    WriteLn;    End;End.

Вот первая задача

Объяснение:

#include <stdio.h>

int main()

{

   int k;

   printf("Введите номер дня\n");

   scanf("%i", &k);

   if((k < 1)||(k > 365))

   {

       printf("День не подходит");

       return 0; // немедленный выход из функции и приложения

   }

   int den = k % 7; //операция остаток от деления. Тут будет номер дня недели от 0 до 6

   den = den + 1 + 2; // 2 - это номер первого дня года, вторника, 1 - это чтобы преобразовать из диапазона 0-6 в диапазон 1-7

   printf("День номер %i был %i днем недели", k, den);

   return 0;

}