Описать процедуру, которая определяет, есть ли в очереди хотя бы один элемент, который равен следующему за ним - Free Pascal
Формулировка задачи:
Описать процедуру, которая определяет, есть ли в очереди хотя бы один элемент, который равен следующему за ним элементу.
С модулем, надо завтра сдавать, сам не могу разобраться, наработок нет
- без таких ответов пожалуйста
Решение задачи: «Описать процедуру, которая определяет, есть ли в очереди хотя бы один элемент, который равен следующему за ним»
textual
Листинг программы
Program PABCP; var A : array [1..50] of integer; // ТУТ НАША ФУНКЦИЯ begin // ТУТ ЗАПОЛНЯЕМ МАССИВ if (nextInLine() = true) then begin writeln('Есть такой элемент'); else begin writeln('Таких элементов нет'); end; end.
Объяснение кода листинга программы
- Создаётся массив из 50 элементов типа integer с именем A.
- В функции nextInLine() происходит проверка, есть ли в очереди хотя бы один элемент, который равен следующему за ним. Функция возвращает true, если условие выполняется, и false в противном случае.
- Если в функции nextInLine() вернулось значение true, то выводится сообщение
Есть такой элемент
. - Если в функции nextInLine() вернулось значение false, то выводится сообщение
Таких элементов нет
.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д