Мариша741
01.05.2022 11:33

Составим все возможные последовательности из пяти букв, используя только символы L, R, V, и выпишем их в алфавитном порядке. Вот начало этого списка:


R
V
LLLRL
Определите последовательности, которые будут идти в этом списке под номерами 8, 81, 98, 110, 179.

Возможно, вам будет проще ответить на третий и четвертый во если вы будете знать, что на 100-м месте в этом списке стоит строка RLVLL.

В ответе нужно записать пять строк, состоящих из латинских букв. ответ на каждое задание нужно писать в отдельной строке (в первой строке – слово, стоящее в списке 8-м, во второй строке – слово, стоящее 81-м, в третьей строке — 98-м, в четвертой строке – 110-м, в пятой строке – 179-м). Порядок записи строк в ответе менять нельзя. В ответе должно быть ровно пять строк. Если вы не можете найти какой-то из ответов, вместо него напишите любую строчку из данных пяти букв

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
eva301
21.12.2021 00:00
2 минуты = 120 секунд
120 = 2^{3} * 15
8 Мбит/с = 8.388.608 бит/с
1) 8388608 / 2 = 4194304
2) 4194304 / 2 = 2097152
3) 2097152 / 2 = 1048576
4) 1048576 / 2 = 524288
5) 524288 / 2 = 262144
6) 262144 / 2 = 131072
7) 131072 / 2 = 65536
8) 865536 / 2 = 32768
9) 32768 / 2 = 16384
10) 16384 / 2 = 8192
11) 8192 / 2 = 4096
12) 4096 / 2 = 2048
13) 2048 / 2 = 1024 = 2^{10}

Прибавим в степень еще действия выше, получим - 2^{23} = 8388608
Для того, чтобы найти размер файла умножаем скорость на время, получаем: 2^{3} * 15 * 2^{23} = 2^{26} *15 бит
Переводим в мегабайты, учитывая, что 2^{23} = 1 Мб:
1* 2^{3} *15=120 Мб

ответил так, чтобы можно было решать такие задачи на бумаге. Т.е. путем представления цифр в виде "2 в степени"
0,0(0 оценок)
Ответ:
bushina2
22.06.2020 12:36
1) В цикле Repeat Until идет проверка, что число введено в диапазоне [0..200}
var
i,n:integer;
a:longint;
p:real;
begin
p:=1;
Repeat
    readln(n);
Until (n>=0)and(n<=200);
for i:=1 to n do
   begin
        readln(a);
        p:=p*a;
   end;
writeln(p);
end.

2)
var
i,n:integer;
a,max:longint;
begin
Repeat
    readln(n);
Until (n>=0)and(n<=200);
for i:=1 to n do
   begin
        readln(a);
            if a>max then
                max:=a;
   end;
writeln(max);
end.
3)
var
i,n:integer;
a,min:longint;
begin
Repeat
    readln(n);
Until (n>=0)and(n<=200);
for i:=1 to n do
   begin
        readln(a);
            if a<min then
                min:=a;
   end;
writeln(min);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота