Возможные ответы: 1. В том случае, если все вновь вычисленные контрольные биты совпадают с полученными, то сообщение получено без ошибок. 2. Если ошибка произошла только в одном бите.
В ответах не уверен, руководствовался материалом https://habrahabr.ru/post/140611/.
{Массив задаётся с помощью генератора случайных чисел. после того как он задан, последовательно перебираются все элементы и определяется наименьший элемент.} procedure minZNmas; <span> var </span> mas: array[1..15] of integer; k: integer; min: integer; s: string; begin
randomize; //Заполнение массива случайными величинами s:=''; for k:=1 to 15 do begin mas[k]:=random(800); s:=s+IntToStr(mas[k])+','; end;
//Поиск минимального значения min:=mas[k]; for k:=1 to 15 do if mas[k]<min then min:=mas[k];