Автоматичний пристрій здійснив перекодування інформаційного повідомлення українською мовою, спочатку записаного в 16-бітному коді Юнікод, у 8-бітне кодування Windows-1251, при цьому довжина двійкового коду повідомлення становила 60 байт. Визначте довжину двійкового коду повідомлення до перекодування. Для розв'язання задачі складіть електронну таблицю, обчислення виконайте за до формул.
1 - 3; 2 - 1; 3 - 5; 4-2; 5-4
Объяснение:
1 - 3
Тут сразу видно, что код бесполезный, как и все остальные 4 =D
Ну в общем переменной buf ты присваиваешь первый элемент массива, на место первого ставишь второй и на место второго - buf... Возвращаешь первый короче на место второго.
2 - 1
Тут у тебя есть какая-то строка x, длина которой измеряется встроенной функцией len. И выполняется цикл for, что для каждого символа этой строки при условии, что если i-ый элемент больше какой-то переменной max, то происходит "перезапись" переменной, что нам найти максимальное значения массива.
3 - 5
Тут грубо говоря аналогично максимуму, только находится минимум и выводится индекс методом index
4 - 2
Тут в самом начале уже стоит условие, что если i-ый элемент делится без остатка на 2 (т.е. четный) то идут манипуляции с перестановкой =D
5 - 4
Тут элементарно. Цикл прогоняют по количеству символов массива y, чтоб потом вызывать по индексу его элементы.
Познакомьтесь с функциями, которые вам нарисовать точку, отрезок, окружность и прямоугольник.
procedure SetPixel(x,y,color: integer); - закрашивает один пиксел с координатами (x,y) цветом color (точка).
procedure Line(x1,y1,x2,y2: integer); - рисует отрезок с началом в точке (x1,y1) и концом в точке (x2,y2).
procedure Circle(x,y,r: integer); - рисует окружность с центром в точке (x,y) и радиусом r.
procedure Rectangle(x1,y1,x2,y2: integer); - рисует прямоугольник, заданный координатами противоположных вершин (x1,y1) и (x2,y2).
procedure SetPenColor(color: integer); - устанавливает цвет пера, задаваемый параметром color.
function PenColor: integer; - возвращает текущий цвет пера.
procedure SetPenWidth(w: integer); - устанавливает ширину пера, равную w пикселам.
type ColorType=integer; - стандартные цвета задаются символическими константами:
clBlack – черный
clPurple – фиолетовый
clWhite – белый
clMaroon – темно-красный
clRed – красный
clNavy – темно-синий
clGreen – зеленый
clBrown – коричневый
clBlue – синий
clSkyBlue – голубой
clYellow – желтый
clCream – кремовый
clAqua – бирюзовый
clOlive – оливковый
clFuchsia – сиреневый
clTeal – сине-зеленый
clGray – темно-серый
clLime – ярко-зеленый
clMoneyGreen – цвет зеленых денег
clLtGray – светло-серый
clDkGray – темно-серый
clMedGray – серый
clSilver – серебряный