а) 4 (<span> журнал, <span>6)</span></span>
б) 1 (<span> Известия 6)</span>
в) 1, 4 (<span> Известия 6, </span>Огонек 6)
Var
N:integer;
A,max,min:real;
Begin
Write('N = ');ReadLn(N);
WriteLn('Введите числа');
Read(A);
max:=A;
min:=A;
For N:= 2 to N do
Begin
Read(A);
if A>max then max:=A;
if A<min then min:=A;
End;
WriteLn('Max = ',max);
WriteLn('Min = ',min);
End.
Объяснительная.
Я,ФИО, пропустила уроки потому,что спала. Сон был настолько реальным,что я подумала,что пошла в школу. По пути в школу было много приключений и тд. У меня не очень хорошая фантазия
1)32x32=1024 точки.
2)512 байт=4096 бит.
3)<span>4096/1024 = 4 бит на каждую точку.
</span>4)2^4=16 цветов .