а), б)
var a, b, c: char;
begin
writeln('Введите 3 символа');
readln(a, b, c);
writeln('Результат сцепления: ', a+b+c);
if a>b then writeln(a,'>', b);
if a>c then writeln(a,'>', c);
if a=b then writeln(a, '=', b);
if a=c then writeln(a, '=', c);
if a<b then writeln(a, '<', b);
if a<c then writeln(a, '<', c);
if b>c then writeln(b, '>', c);
if b<c then writeln(b, '<', c);
end.
в)
var a, b: char;
begin
writeln('Введите 2 символа');
readln(a, b);
if a>b then writeln(b,' ', a);
if a<b then writeln(a,' ', b);
if a=b then writeln(a,' ', b);
end.
I = [log_2 (N)] - округление в большую сторону
1 байте = 8 бит.
Задача 1
Трижды запускается либо красная, либо зелёная ракета.
N = 2^3 = 8
ответ: 8
Задача 2
I = [log_2 (800)] = [9.6438] = 10 бит на ученика
Объём 320 учащихся = 320 * 10 = 3200 бит = 400 байт
ответ: 4
Задача 3
I = [log_2 (10+12+12)] = [5.0875] = 6 бит на символ
6 * 11 = 66 бит = 8.25 байт ~= 9 байт
9 * 60 = 540 байт
ответ: 3
Задача 4
I = [log_2 (5*5)] = [4.6439] = 5 бит на клетку
15 ходов + начальная позиция = 16 клеток
16 * 5 бит = 80 бит = 10 байт
ответ: 1