Var
<span>prin: boolean; </span>
<span>x, y: integer; </span>
<span>begin </span>
<span>readln(x); </span>
<span>readln(y); </span>
<span>if (x <= 0) and (x >= -3) and (y <= x + 3) then </span>
<span>prin := true </span>
<span>else if (x >= 0) and (x <= 3) and (y <= - x + 3) then </span>
<span>prin := true </span>
<span>else if (y <= 0) and (y >= -3) and (abs(x) <= 3) then </span>
<span>prin := true </span>
<span>else </span>
<span>prin := false; </span>
<span>if prin then writeln('принадлежит') else writeln('не принадлежит'); </span>
<span>end.</span>
Общее количество пикселей: 2500 * 1500 = 3750000 px
Память: 1.5 MB = 12582912 bit
На один пиксель приходится: 12582912 / 3750000, т.е максимум 3 бита.
При такой глубине цвета доступны 8 цветов.
Var
a,b,c:real;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
Write('c = ');
ReadLn(c);
WriteLn(a+b-c/(a-2*b));
<span>End.
</span>
Если это Exel, тогда в формуле просто заменятся сами ечейки, а формула останется прежней.(советую проверить на любой формуле, т.к. Word бывает разных версий и настроек, но должно быть как я и описал)
Т.е. было допустим =sum(C1:C3) а после копирования =sum(E2:E4)
Считай варианты.
Плюшка с кофе.
Плюшка с соком
Плюшка с кефиром
Плюшка с чаем.
И столько же только с бутербродом вместо плюшки.
И того 8 вариантов