function Distance2(a,b:Point):real; { возвращает квадрат расстояния между точками } begin Distance2:=sqr(b.x-a.x)+sqr(b.y-a.y) end;
function Max(p,q:real):real; { возвращает максимальное из p,q } begin if p>q then Max:=p else Max:=q end;
procedure Vvod(var a:Point;n:integer); { процедура с изменяемым параметром a } begin Write('Введите координаты точки ',n,': '); Readln(a.x,a.y) end;
var a:array[1..3] of Point; d1,d2,d3:real; i:integer;
begin for i:=1 to 3 do Vvod(a[i],i); d1:=Distance2(a[1],a[2]); d2:=Distance2(a[1],a[3]); d3:=Distance2(a[2],a[3]); if d1>d2 then if d1>d3 then Writeln('Максимальное расстояние 1-2') else if d1=d3 then Writeln('Максимальное расстояние 1-2 и 2-3') else Writeln('Максимальное расстояние 2-3') else if d1=d2 then if d1>d3 then Writeln('Максимальное расстояние 1-2 и 1-3') else if d1=d3 then Writeln('Расстояния между всеми точками одинаковы') else Writeln('Максимальное расстояние 2-3') else if d3>d2 then Writeln('Максимальное расстояние 2-3') else if d3=d2 then Writeln('Максимальное расстояние 1-3 и 2-3') else Writeln('Максимальное расстояние 1-3'); end.
Тестовое решение: Введите координаты точки 1: -2 1 Введите координаты точки 2: 4 5 Введите координаты точки 3: 2 -2 Максимальное расстояние 2-3
должно быть минимум 7 элементов
Объяснение:
Каждый излучающий элемент имеет два состояния- красный или синий цвет (выключенное состояние не рассматривается по условиям).
Значит, число возможных вариантов, которые можно показать на таком табло равно двум в степени, равной числу элементов.
Например:
один элемент:
различных сигнала (состояния панели)
три элемента:
различных сигналов можно отобразить
шесть элементов:
различных сигнала (мало, надо сто)
семь элементов:
различных сигналов (нам хватит)
Выбираем семь элементов, т.к. ими можно отобразить сто вариантов (и даже немного больше).
Можно и посчитать число элементов напрямую, без подбора.
Считается через логарифм по основанию два из десяти, затем округляется с избытком (то есть, всегда вверх):
В расчёте также показано, что такой логарифм можно посчитать через отношение двух десятичных логарифмов (lg), либо двух натуральных логарифмов (ln).