Каждый символ может принимать любое значение, точка, либо тире.То есть мы можем получить и ... и _ _ _ и _._ и ещё кучу всего (это только из 3ёх, из 4ёх символов аналогично, но кол-во будет больше)Для начала подсчитаем количество символов, которое можно закодировать с ёх знаков:Далее подсчитаем, сколько символов можно закодировать с четырёх знаков:Формула состоит из количества знаков, которыми можно записать число, возведённых в степень, равную количеству использования этих знаков. Что бы узнать, сколько можно закодировать используя "не менее 3ёх и не более 4ёх сигналов", нужно просто сложить наши два результата, 8+16=24
1)var a,b,c:integer; begin writeln('Введите возраст 1 друга'); readln(a); writeln('Введите возраст 2 друга'); readln(b); writeln('Введите возраст 3 друга'); readln(c); if (a>b) and (a>c) then writeln('Старшим является 1 друг') else if (b>a) and (b>c) then writeln('Старшим является 2 друг') else writeln('Старшим является 3 друг'); end. 2)var a,b:integer; begin writeln('Введите возраст 1 друга'); readln(a); writeln('Введите возраст 2 друга'); readln(b); if a>b then writeln('Старшим является 1 друг') else writeln('Старшим является 2 друг'); end.
var a, b: integer;
begin
Write('Ведите числа a и b: '); ReadLn(a, b);
if a > b then WriteLn(a, ' больше ', b)
else if b > a then WriteLn(b, ' больше ', a)
else WriteLn('Числа равны');
end.
Объяснение: