Var a,t,s,zn,zn1:real;
z,r,q1,q2,q3,qv1,qv2,qv3:integer;
function kv(s:real):real;
begina := sqrt(s);kv := a;
end;
procedure d(r:integer;var m,m1:real);
var h:integer;begin
h := -26+r div 100*100;
r := (r-h) mod 10+7864;
m:= r;m1 := h;
end;
procedure rt(v1,v2,v3:integer;var n1,n2,n3:integer);
beginif v2 > v3 then
v1:= v1 + v2else
v1 := v1 + v3;
n1:=v1; n2:= v2; n3:=v3;
end;
procedure rt2(v1,v2:integer;var n1,n2:integer);
beginif (v1 mod 2 =0) and (v2 mod 2 = 0) then
begin n1:= 0; n2:= 0;end
else if (v1 mod 2 =0)then
v1 := v1 *5
else if(v2 mod 2 =0)then
v2:= v2 * 5;
n1:=v1; n2:= v2;
end;
function rr(a,b:integer):real;
var c: integer;
begin
b :=b-2*a;
if a < b then rr:=b-a else rr:=a-2*b;
end;
beginr :=7974;
writeln('Введите площадь квадрата');
readln(s);
t:= kv(s);
writeln('Сторона квадрата равна = ',t);
d(r,zn,zn1);
writeln('переменные a, b значение примут ',zn: 5, zn1: 5);
writeln('Ввести три числа A, B,C');
readln(q1,q2,q3);rt(q1,q2,q3,qv1,qv2,qv3);
writeln('A, B, C получили значения',qv1:4,qv2:4,qv3:4);
writeln('Ввести числа x, y');
readln(q1,q2);
rt2(q1,q2,qv1,qv2);
writeln('x, y получили значения',qv1:4,qv2:4);
writeln('Определяем, какое значение примет переменная c');
q1:=20;q2:=10;
s:= rr(q1,q2);
writeln('Переменная c примет значение: ', s);
<span>end.</span>
1) 27^4 – 9^5 + 3^8 – 25 (см. рис)
Приведём все числа к степеням тройки, учитывая, что
25 = 27-2 = 3^3-2∙3^0
27^4 – 9^5 + 3^8 – 25 = (3^3)^4 - (3^2)^5 + 3^8 - 3^3 + 2∙3^0 =
(3^12 - 3^10) + (3^8 - 3^3) + 2∙3^0
Найдем значение разности в первой скобке, учитывая что 12-ая степени тройки в троичной системе это 1000000000000(3), а 10-ая степень - это 10000000000(3)
1000000000000(3)
-
10000000000(3)
-----------------
220000000000(3)
Т.е. в троичной записи 12–10 = 2 «двойки» и 10 «нулей».
Вычислим аналогично вторую скобку:
100000000(3)
-
1000(3)
-----------------
22222000(3)
Т.е. в троичной записи 8–3 = 5 «двоек» и 3 «нуля».
Таким образом, общее количество двоек = 2+5+1 = 8
2) 3∙16^8 – 4^5 + 3 (см. рис)
Приведём все числа к степеням четверки:
3∙16^8 – 4^5 + 3 = 3∙(4^2)^8 – 4^5 + 3∙4^0 = 3∙4^16 – 4^5 + 3∙4^0
Найдем значение разности, учитывая что 3∙4^16 в системе счисления с основанием 4 это одна «тройка» и 16 «нулей», а 4^5 - это одна «единица» и 5 «нулей»:
30000000000000000(4)
-
100000(4)
--------------------
23333333333300000(4) (одна «двойка», 11 «троек» и 5 «нулей»)
Таким образом, общее количество троек = 11+1 = 12
В семеричной системе счисления используются цифры 0..6
Количество искомых цветов проще всего вычислить простым перебором:
1) 100 - 1
2) 200, 201, 210 - 3
3) 300, 301, 302, 310, 311, 320 - 6
4) 400, 401, 402, 403, 410, 411, 412, 420, 421, 430 - 10
5) 500, 501, 502, 503, 504, 510, 511, 512, 513, 520, 521, 522, 530, 531, 540 - 15
6) 600, 601, 602, 603, 604, 605, 610, 611, 612, 613, 614, 620, 621, 622, 623, 630, 631, 632, 640, 641, 650 - 21
Итого: 1+3+6+10+15+21 = 56
<span>Цвет в модели HSB описывается при помощи трех параметров: тона, насыщенности и яркости. Тон — это конкретный оттенок цвета. Насыщенность характеризует его интенсивность, или чистоту. Яркость же зависит от количества черной краски, добавленной к данному цвету.
Эту модель для наглядности можно представить в виде цилиндра, где длина окружности, образующей основание, соответствует параметру тона, радиус основания — оси изменения насыщенности, а высота боковой поверхности — оси изменения яркости (рис. 7.3). </span><span>Рис. 7.3. Представление цветовой модели HSB</span><span>
Значение цвета задается вектором, выходящим из центра окружности. Точка в центре соответствует белому цвету, а точки на границе окружности — чистым цветам. Направление вектора определяет цветовой оттенок и указывается в угловых градусах. Длина вектора определяет насыщенность цвета. Яркость цвета задается на отдельной оси. Таким образом, значение тона измеряется в градусах от 0 до 360, а значения насыщенности и яркости — в процентах от 0 до 100. Эта модель более удобна, чем другие, так как она хорошо согласуется с принципом восприятия цвета человеком, и наиболее проста для понимания: сначала можно определить цветовой тон, а затем задать ему насыщенность и яркость. Но, к сожалению, эта модель не самая удобная для использования в издательских системах, поэтому на практике она применяется мало. Вместе с тем цвет в Photoshop вы выбираете, используя модель HSB, при этом можете видеть в соответствующих полях и цифровые значения моделей RGB и CMYK. </span>
<span />