Турфирма, продающая путевки в Антарктиду, для привлечения клиентов предоставляет следующую услугу: любой посетитель в офисе компании может узнать температуру воды на южном полюсе в данный момент. Эта информация приходит по за по спутниковому каналу. Для защиты информации от помех используется метод Хемминга. Двоичный канал передает числа от 0 до 15 в обычной двоичной кодировке (0 – 0000, 1 – 0001, 2 – 0010, …, 15 – 1111) с добавлением необходимого количества контрольных символов. Но автоматическая система в офисе отказала. По за пришло сообщение агенту декодировать сообщение и исправить его в случае ошибок. В ответ необходимо послать контрольную последовательность, указывающую на корректный прием: 1001. Это значение нужно закодировать по методу Хемминга для передачи по спутниковому каналу.

program z1;

begin

writeln(random(82)-14)

end.

Объяснение:

Конечный промежуток состоит из множества чисел, заключенных между двумя числами a и b - концами промежутка, которые сами могут быть включены в его состав, или нет.

Если a < числа из промежутка < b называется открытым промежутком (интервалом) и обозначается (a; b) - a и b в состав промежутка не входят.

Функция random генерирует случайное число в диапазоне от 0 до значения указанного в скобках (не включая само значение).

Например: random(82) - генерирует случайное число в диапазоне от 0 до 81.

Если требуется получать значения в каком-либо другом диапазоне (не от 0), то прибегают сначала записывают  выражение random (21) в результате, сначала будет получено число из диапазона [0; 20], а затем из него вычитают 10. И если случайное число было меньше 10, то результат выражения будет отрицательным. В результате random (21) - 10 - получает числа из промежутка [-10; 10].

Например: random(82) - 14 - генерирует случайное число в диапазоне от 0 до 81, а затем вычитает из него 14, и если случайное число было меньше 14, то результат выражения будет отрицательным. В результате random(82) - 14 - получает числа из промежутка (-15; 68).  -15 и 68 в состав промежутка не входят.

Задание 1:

ответ: 120

Объяснение:

Изначально i = 0,  f = 1. Потом идёт цикл, который пока i<15? выполняет:

Увеличивает i на 4Умножает f на 2Увеличивает f на i

Цикл будет выполнятся при i = 0, 4, 8, 12 (потом идёт 16, условие 16<15 не выполняется).

i = 0             i = 0+4 = 4           f = 1*2 = 2            f = 2+4 = 6i = 4             i = 4+4 = 8           f = 6*2 = 12          f = 12+8 = 20i = 8             i = 8+4 = 12          f = 20*2 = 40      f = 40+12 = 52i = 12            i = 12+4 = 16        f = 52*2 = 104     f = 104+16 = 120Задание 2:beginReadArrInteger(3).Sum(x -> x<0 ? x : 0).Println;end.

Пример работы: