Первую букву можно выбрать десятью способами, вторую - 33-мя, третюю тоже 33-мя. Четвертая и пятая при этом детерминированны и равны второй и первой соответственно.
Итого: 10*33*33 = 10890
Количество символов в алфавите марсиан (количество различных символов в приветствии) = 8. Для кодирования одного из 8 символов требуется log(2)8 = 3 бита (2^3=8). Приветствие состоит из 10 символов, количество информации в нем: 10*3 = 30 бит.
Ответ: г) 30 бит
Var x:real;
function y16(x:real):real;
begin
if x<=0 then y16:=x+2;
if (x>0) and (x<3) then y16:=-x+2;
if x>=3 then y16:=-2;
end;
function y18(x:real):real;
begin
if x<=0 then y18:=-x-3;
if (x>0) and (x<5) then y18:=x-3;
if x>=5 then y18:=2;
end;
begin
readln(x);
writeln(y16(x));
writeln(y18(x))
end.
Відпоаідь - 1. всі інші не підходять, оскільки припевних комбінаціях XYZ, <span>F дорівнюватиме 0</span>
1) var m,n,z,i,b,count: Integer;
begin
writeln('Введите кол-во рядов');
readln(m);
writeln('Введите кол-во мест в каждом ряду');
readln(n);
writeln('Сколько билетов куплено?');
readln(z);
for i:=1 to m do
begin
for b:=1 to n do
begin
Inc(count);
end;
end;
if (z=count) or (z<count) then writeln('Хватит') else
if z>count then
writeln('Не хватит');
end.
2) var a,b,c: Integer;
begin
writeln('Введите числа a и b');
readln(a,b);
c:=a+b;
if c>10 then
begin
a:=a*5;
b:=b*5;
end;
if (c=10) or (c<10) then
begin
a:=a-5;
b:=b-5;
end;
writeln('a - ',a);
writeln('b - ',b);
end.
3) var x: Real;
begin
writeln('Введите x');
readln(x);
if x<4 then writeln(sqrt(x+1));
if x>4 then writeln(2.5*x-2);
if x=4 then writeln(3*(x*x)-1);
end.