uses crt;
var n,m,i,p:longint;
s,k:byte;
begin
clrscr;
repeat
write('Введите натуральное число N=');
readln(n);
until n>0;
m:=n;
s:=0;
while m>0 do
begin
s:=s+m mod 10;
m:=m div 10;
end;
writeln('Числа от 1 до ',n-1,', у которых произведение цифр=',s);
k:=0;
for i:=1 to n-1 do
begin
m:=i;
p:=1;
while m>0 do
begin
p:=p*(m mod 10);
m:=m div 10;
end;
if p=s then
begin
k:=1;
write(i,' ');
end;
end;
if k=0 then write('Таких чисел нет');
readln
end.
Объяснение:
Дано: текст 3.5 килобайта
Найти: количество символов в тексте
Решение: Итак, текста у нас 3.5 килобайта
Переведём в байты:
3.5 кбайта * 1024 байт\килобайте = 3584 байт.
Так как кодировка не указана выбираем саму распространенную при обучении однобайтовую, тогда символ занимает ровно один байт и значит у нас
3584 символа. Если же используется двухбайтная кодировка, то 3584/2 = 1792 символа
ответ: 3584 для одного байта на символ или 1792 сиволов для двух байтной кодировки.
Задача 2
Дано:
Два текста - одинаковое количество символов.
У первого алфавит мощностью 32 символа,
у второго алфавит мощностью 64 символа
Найти:
во сколько раз отличаются объемы текстов
найдем объем инфомрации символа первого текста
log2(32) = 5 бит (логарифм двоичный от 32)
для второго текста
log2(64) = 6 бит
Пусть текст имеет длину Х
тогда первый текст имеет объем 5x, а второй 6x.
Разделим: 6x/5x = 6/5 или 1.2
ответ: в 6\5 раз отличаются объемы текстов.
Переставьте флешку в другой USB-порт;
Переставьте флешку в USB-порт сзади системного блока;
Вставьте накопитель напрямую в компьютер или ноутбук, без использования любых удлинителей и юсб-хабов.
Определите, причина в ЮСБ-портах или в самой флешке:
Вставьте накопитель в другой компьютер или в смартфон через OTG-переходник (телефон должен поддерживать OTG);
Подключите любое другое USB-устройство, чтобы убедиться в работо портов.
Теперь поясню, некоторые порты могут не работать, просто потому что их раньше спалили или там испортились контакты. Загляните в них, если видно грязь и мусор, то хорошенько продуйте. Затем, если произошла перегрузка по питанию USB-порта, он не будет работать. Причём, чтобы его «привести в порядок» нужно полностью обесточить компьютер, вынув кабель из розетки на 1 минуту. Ноутбук нужно выключить и достать батарею на 1 минуту.
Перегрузка по току бывает когда подключено много устройств по ЮСБ или одно, но потребляет много энергии, например смартфон на зарядке, вентилятор, увлажнитель воздуха, устройство подогрева или настольная лампа.
Объяснение:
Попробуйте ка