Решение смотри во вложении.
Обозначим искомое количество килобайт как Х.
100 Кб:1536 бит = Х Кб:768 бит.
Х = (100*768):1536 = 50.
Ответ: 50 Кб.
1 , 4 , 2 , 3 , 3 , 4 ,1, 2
Б) 0:05. Это рейс с пересадкой в Москве.
Несмотря на множество рейсов, вариантов перелёта всего 4: прямой до Лондона, с пересадкой в Москве, с пересадкой в Праге и с двумя пересадками в Москве и Праге.
Прямой рейс уже улетел, пассажир будет в Лондоне завтра в 22:25
Через Москву пересадка займёт 20 минут и он будет в Лондоне в 0:05.
Через Прагу не получится, так как Лондонский рейс вылетает за 40 минут до прилёта Киевского и надо сутки ждать в Праге.
А две пересадки тоже не катят, надо полдня ждать в Праге.
Pascal
var n: integer;
a: 0..9; b: boolean;
begin
write('Введите число N: ');
readln(n);
if n>0 then
begin
write('Введите цифру A: ');
readln(a);
if (a>=0) and (a<=9) then
begin
while (n>1) do
begin
if a=n mod 10 then begin b:=true; break; end else b:=false;
n:=n div 10;
end;
writeln(b);
end else writeln('Введите цифру A от 0 до 9');
end else writeln('Введите другое число, больше 0!');
end.