При использовании палитры из 16 цветов для хранения одного пикселя требуется log(2)16 = 4 бита. Объем памяти для хранения изображения = 53*53*4 бит = 11236 бит
№ 1.
2^i = N, N = 64
2^i = 64
i = 6 бит
1280 * 6 = 7680 бит
7680 : 8 = 960 байт
№ 2.
38912 бит : 8 = 4864 байт
4864 : 1024 = 4,75 Кбайт
№ 3.
3КБайт = 3 * 1024 = 3072 байт
3072 * 8 = 24576
24576 : 6144 = 4 бит приходится на 1 символ
2^4 = 16 символов содержит алфавит
№ 4.
2^i = 8
i = 3 бит приходится на 1 символ
10 * 40 * 5 * 3 = 6000 бит
6000 : 8 = 750байт
Если, когда, круг, ждать, цикл, повторять.
1. Var a, b, c:real; d:integer;
Begin
Readln(a, b) ;
S:=a*b;
Write(s) ;
End.
2.
Var a, b, c:real; d:integer;
Begin
D:=0;
Readln(a);
If (a>0) then d:=d+1;
Readln(b) ;
If (b>0) then d:=d+1;
Readln(c>0) then d:=d+1;
Write(d);
End.
2 3 5 3 10 7 4 6 12 9 2 1 4 3 7 7 4 2 10 9 24
var s, n,sum,sum1,p,i:integer; sr:real;A:Array[1..10] of integer;BeginA[1]:=2;A[2]:=3;A[3]:=5;A[4]:=3;A[5]:=10;A[6]:=7;A[7]:=4;A[8]:=6;A[9]:=12;A[10]:=9;n:=10;s:=0;for i:=1 to n do write(A[i]:3);writeln;for i:=2 to n do beginif A[i-1] < A[i] then beginA[i]:= A[i] - A[i -1];s:= s + A[i];end;end;for i:=1 to n do write(A[i]:3);writeln;write(s:3);end.