1. Мощность здесь - это количество символов - 16.
2. Р = 01
А = 100
Д = 00
А = 100
Р = 01
ДАР
3.
C D
CCC DDD
CCD DDC
CDC DCD
DCC CDD
5. N(мощность алфав.)=4 т.к. в этих словах использованы всего 4 буквы
6. 33-я; 2-б; 13-л; 16-о; 15-н; 33-я
Яблоня
<span>var<span>
A, B, C: integer;</span>
begin<span>
write('Введите A, B и C: ');</span><span>
read(A,B,C);</span><span>
writeln('Число B находится между числами A и C - ',((A < B) and (B < C)) or ((A > B) and (B > C)));
</span><span>end<span>.</span></span></span>
Ответ: writeln(a,'+',b,'=?');
Значения, которые не являются переменными, выводятся в '' скобочках.
<span>141141 - Мама 1429131 - мыла 1811421 - раму
ответ А)</span><span>Мама мыла раму</span>
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
var k:=0;
for var n:=184 to 254 do begin
var m:=n;
while m mod 2=0 do m:=m div 2;
while m mod 3=0 do m:=m div 3;
if m=1 then Inc(k)
end;
Writeln('Количество чисел равно ',k)
end.
<u><em>Результат выполнения программы</em></u>
Количество чисел равно 3