Uses graphabc;
begin
rectangle(100,100,400,400);
circle(100,100,50);
circle(400,100,50);
circle(100,400,50);
circle(400,400,50);
<span>end.</span>
Var
txt:text;
begin
assign(txt,'C:\input.txt');
reset(txt);
Принтер, колонки, клавиатура, мышь, сканер, монитор и т.д
1) 640 × 350 =224000 пикселей в данном изображении
2) N = 2^i
16 = 2^i
i = 4 бит - глубина кодирования одного пикселя изображения
3) 4 бита × 224000 = 896000 бит = 112000 байт = 109,375 Кбайт занимает изображение в видеопамяти ПК