begin
var a := SeqGen(15, i -> i + 1).ToArray; a.Println;
{если нужно вводить вручную, закомментируйте вторую строку
и раскомментируйте пятую}
// var a := ReadArrInteger(15);
Swap(a[0], a[4]);
Swap(a[9], a[14]);
a.Println;
end.
1 Гбайт - это два в десятой степени Мбайт. ! Мбайт - это это два в десятой степени Кбайт. Следовательно, 1 Гбайт - это два в двадцатой степени Кбайт.
Ответ: 0.5 Гбайт.
<em><u>Примечание.</u></em> Ответ получен с учетом того, что фраза из вопроса "2 в 19 степени 19 Кбайт" лишена смысла и должна пониматься, как "2 в 19 степени Кбайт".
1. Оперативная: а, г, д, е
Долговременная: б, в, ж
2. "0" или"1" - это 1 бит. 8 бит = 1 байту. отделим по 8 "0" и "1", начиная с конца. получится 4 разделения, т.е. 4 байта.
3. 1024 бит/8 = 128 байт. если запись велась с 10, то адрес последнего будет 10+128 = 138.
4. флеш-карта, дискета, CD, DVD, съемный жесткий диск.
Оттуда:
Сложение двух чисел тривиально — достаточно поставить 1 между ними и стереть крайний правый символ у Q. Программа вычитания состоит из последовательного затирания крайних левых меток у Q и правых у P:
1. 0 - стираем левый символ у Q
2. →
3. ? 5, 4
4. Stop - стоп если затерли Q=0
5. ←
6. ? 7, 5 - цикл поиска P
7. 0 - стираем правый символ у P
8. →
9. ? 1, 8 - ищем Q
Отметим, что номер команды перехода не указывается, если переход происходит на следующую по порядку строку (для наглядности текста) . В 6-ой строке возможно зацикливание, если Q > P (вы можете добавить проверку сами)
<span>****только вам нужно сдвинуться в начало строки и учесть пустую клетку-т. е. еще один проскок каретки</span>
Ввод
Монитор
Окно
Курсор
ОН( первый раз), СЛОН( ВТОРОЙ РАЗ), СМЕШОН( ТРЕТИЙ РАЗ) ОКОНЧАТЕЛЬНО( 4 раз) и АНТОН( 5 раз)
Ответ: 5 раз