3 байта =3*8 бита=24 бита для одного цвета
2^(24) =1024*1024*16=16 777 216 - количество цветов
(0×2+1)×2+1)×2+0)×2+1)×2+1)×2+0)×2+1)=109
<em>r1 побидит или я просто не понял
</em>
<span>первые 20 чисел в шестнадцатеричной системе счисления
</span><span><span>[16]
</span><span>
0
</span><span>
1
</span><span>
2
</span><span>
3
</span><span>
4
</span><span>
5
</span><span>
6
</span><span>
7
</span><span>
8
</span><span>
9
</span><span>
A
</span><span>
B
</span><span>
C
</span><span>
D
</span><span>
E
</span><span>
F
</span><span>
10
</span><span>
11
</span><span>
12
</span><span>
13
</span><span>
14
</span></span><span><span><span /></span></span>
Картинка должна быть в папке с программой и быть в формате BMP
uses
graphabc;
var
n: string;
b: Picture;
s:integer;
begin
writeln('введите расстояние до зеркала');
readln(s);
write('Введите имя файла рисунка: ');
readln(n);
window.Clear;
b := Picture.Create(n);
b.Load(n);
b.Draw(50, 50);
b.FlipHorizontal;
b.Draw(50+2*s,50);
end.