<span>1) Вставка, удаление, замена, поиск и замена
2) {↑}
{End}
{Home}
{→}
{PageUp}
3) Видеоинформация
</span>
<span><span>Program Zvezda;
Uses GraphABC;
begin
SetBrushColor(clred);
Line(290, 111, 240, 190);
Line(240, 190, 171, 190);
Line(170, 190, 241, 250);
Line(241, 250, 209, 320);
Line(209, 320, 290, 289);
Line(290, 289, 369, 318);
Line(369, 318, 340, 248);
Line(340, 248, 410, 190);
Line(410, 190, 340, 190);
Line(340, 190, 289, 111);
Line(289, 113, 289, 289);
Line(242, 249, 341, 190);
Line(340, 249, 242, 190);
Line(171, 191, 290, 220);
Line(291, 220, 411, 191);
Line(209, 319, 290, 222);
Line(290, 222, 369, 321);
Readln;
Closewindow;
End.</span></span>
Сначала нужно определить количество бит, которое требуется для сохранения одного номера. Всего 220 уникальных номеров. Количество бит вычисляется по формуле 2^n = k, где n - биты, а k - варианты, которые этими битами можно закодировать.
7 бит недостаточно для хранения 220 номеров, т.к. 2^7 = 128
8 бит достаточно, т.к. 2^8 = 256. То есть на одного спортсмена выделяется 8 бит, или 1 байт.
Всего участвовало 100 спортсменов, 100*1байт = 100байт
1 большая градация цветовой палитры
2 так как много степеней сжатия плюс разные фирмы и устройства для которых придумывают свои форматы изображений
Program esep;
const min = -1;
max = 1;
step = 0.1;
var a, b, x, y : real;
begin
x := min;
write('введите a, b, x: ');
readln(a, b, x);
repeat y := 1+sqr(a+ b)/(x-a);
writeln('X = ', x:6:2, ' Y(X) = ', y:6:2);
x := x + step
until x >= max + step;
readln
<span>end.</span>