Задан целочисленный массив из 10 элементов.
опеделить, идут ли элементы массива в порядке
возрастания.
конец
Определить, есть ли в массиве последовательность из N
повторяющихся элементов, стоящих подряд.
Найти в массиве самую длинную последовательность из стоящих подряд элементов (вывести
оцение элемента и номера первого и последнего элементов последовательности).
Каждый раз, уменьшая неопределенность знаний вдвое, исследователь получает 1 минимальную единицу информации - 1 бит. А при угадывании числа им было получено 8 бит информации, т.е 8 бит получился при выборе из 2-х вариантов, 7-й бит, при выборе из 4-х вариантов, 6-й из 8 вариантов, 5-й - из 16, 4-й из 32, 3-й из 64, 2-й из 128, 1-й из 256. Неопределенность знаний (N) и количество бит информации (i) связаны между собой формулой Хартли N=2^i, т.е. в нашем случае N=2^8; n=256
1. В заголовке процедуры procedure summ(plus:string;minus:string); параметры plus и minus описаны, как строки. В теле процедуры обоим параметрам присваивается значение, равное соединению строк a и b, а вовсе не сумма чисел и их разность, как требует условие.
2. Поскольку параметры не имеют описателя var, после выхода из процедуры их исходное значение не изменяется.
3. Операторы Readn(b) дважды выполняют присваивание переменной b, а переменная a значения не получает.
4. Вызов процедуры summ неверен, поскольку вместо пары строковых фактических параметров используется вызов процедуры Writen, что синтаксически неверно.