Var
A: array [1..10] of integer;
min,i:integer;
begin
i:=1
while i<11 do
begin
readln(A[i]);
i:=i+1;
end;
i:=1;
n:=A[1];
repeat
if min>A[i] then
min:=A[i]
i:=i+1;
until I=10;
A[10]:=min;
end
Дорожные знаки называют - международным языком улицы! гос.стандартом определены 4 группы дорожных знаков - предупреждающие, запрещающие, предписывающие и указательные!)
<span>
1101₂
-111011₂
1100₂
х11011₂
101₂
10101110₂÷111₂</span>
Во вложении схема, позволяющая определить цвет, который получается при смешении двух базовых. Достаточно выбрать вершину, которая находится между вершинами с исходными цветами. В нашем случае между Y и C находится G - зеленый (Green).