Для начала нужно перевести данные числа в десятичную систему счисления.
А) 1001001(двоичная система счисления) = 2^6 + 2^3 + 2^1 = 64+8+2 = 74(десятичная)
Б) 1001100(двоичная) = 2^6 + 2^3 + 2^2 = 64+8+4 = 76( десятичная)
A<C<B
74<C<76
C = 75
2)75
Var i,k,s:integer; p:longint;
begin
k:=0; s:=0; p:=1;
for i:=1 to 50 do
if i mod 8 = 0 then
begin
write(i,' ');
k:=k+1;
s:=s+i;
p:=p*i;
end;
writeln;
writeln('k = ',k,' s = ',s,' p = ',p);
end.
Результат:
<span>8 16 24 32 40 48
k = 6 s = 168 p = 188743680</span>
Заполненная таблица - в прилагаемом файле.
Такие записи есть: 7, 8
Запись на <14:00 – 1, 2, 3, 4, 5, 6
Запись на > «Пятница» – 6, 7, 8
Ответ: 1) 7, 8
________________
БУДУ БЛАГОДАРЕН ЗА ВЫБОР 'КАК ЛУЧШИЙ'