Question

Определить входит ли, элемент Е в список L.
Лабараторка в паскале

Answer 1

Вот пример программы на языке Pascal, которая определяет, входит ли указанный элемент в заданный список:

```

program IsElementInList;

const

elements : array[1..4] of string = ('A', 'B', 'C', 'D');

element : string;

var

i : integer;

begin

writeln('Введите элемент для поиска:');

readln(element);

i := 1;

while (i <= 4) and (element <> elements[i]) do

inc(i);

if i > 4 then

writeln('Элемент не найден в списке.')

else

writeln('Элемент найден в позиции ', i, '.');

end.

```

В данной программе мы создали список элементов и запросили у пользователя искомый элемент. Затем мы перебрали весь список, сравнивая каждый элемент со введенным пользователем. Если совпадение найдено, мы выводим информацию о том, что элемент найден и в какой позиции списка. Если после перебора всего списка совпадение не было найдено, выводится сообщение о том, что элемент не найден.