Использовать Рисователь
алг радуга
нач
новый лист(450, 300, белый)
кисть(красный)
линия(300, 50, 220,50)
линия(220, 50, 220, 100)
линия(220, 100, 300, 50)
залить(230,80)
кисть(серый)
линия(220, 100, 300, 100)
линия(300, 100, 220, 150)
линия(220, 150, 220, 100)
залить(230,110)
кисть(желтый)
линия(220, 100, 130, 100)
линия(220, 100, 130, 150)
линия(130, 150, 130, 100)
залить(150,110)
кон
Для растрового изображения сохраняется цвет каждого пикселя. Сверху накладываются разнообразные сжатия
Векторные изображения сохраняются в виде описания параметров графических примитивов из которых они состоят
Крайние точки не учитываются. Если вам необходимо, чтобы они учитывались - замените знаки < и > на <= и >=
var
Y0,X0:integer;
begin
writeln('Введите координаты точки Y0 и X0');
readln(Y0,X0);
if ( ((X0>-6) and (X0<-3)) and ((Y0>-3) and (Y0<2)) )
or
( ((X0>-6) and (X0<-1)) and ((Y0>2) and (Y0<6)) )
then
writeln('Точка принадлежит области')
else
writeln('Точка НЕ принадлежит области')
end.
1) 1/128=0.0078125 теперь переведём в байты 0.0078125*1024*1024=8192 байт
2) 8/256=0.03125=0.03125*1024*8=256 бит
3) <span>8345676/8/1024=1018 кб
Всё очень просто =)</span>