Const
N = 7;
Var
A:array[1..N,1..N] of integer;
i,j:integer;
Begin
For 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.
№1 - вариант 2 (60 символов*16 бит=960 бит)
№2 - вариант 1 ( 66 символов*8 бит = 528 бит= 66 байт)
№3 - вариант 4 ( 67 символов*16 бит= 1072 бит)
№4 - вариант 3
(всего символов: 64*40*48= 122880, (122880*8 бит)/8/1024= 120 Кбайт)
№5 - вариант 2
(всего символов 64*40*64= 163840, (163840*16 бит)/8/1024= 320 Кбайт)
300*1200 - количество пикселей
24 - "вес" каждого в битах.
300*1200*24 - общий вес изображения в битах
/8 - перевод в байты
/1024^2 - перевод в мегабайты.
Возведение в степень
Ответ:
слушай по информатике у меня плоховато но наверное так
Объяснение:
наверное так
Может А варианты шгар. или В. точно блмедим.