Опубликовано 4 года назад по предмету Информатика от innieo

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать произвольные целые значения. С клавиатуры вводится целое число X. Опишите на русском языке или на одном из языков программирования алгоритм, который находит и выводит наименьший номер элемента, равного X, или сообщение, что такого элемента нет.
const N=30;

var a: array [1..N] of integer;

i, j, x: integer;

begin

for i:=1 to N do readln(a[i]);

readln(x);

...

end.

Ответ

Ответ дан Аккаунт удален

const
N = 30;

var
a: array [1..N] of integer;
i, nel, x: integer;

begin
writeln('Введите элементы массива');
for i := 1 to N do read(a[i]);
writeln('введите Х');
readln(x);
nel := 0; // номер найденного элемента
i := 1;
while (i <= n) and (nel = 0) do
begin
    if a[i] = x then nel := i;
    i := i + 1
end;
if nel > 0 then
    writeln('Номер элемента ', nel)
else
    writeln('Не найден элемент, удовлетворяющий условию')
end.

Тестовый пример:

Введите элементы массива
1 3 6 8 4 9 14 -4 7 45 4 8 0 23 63 253 23 453 54 20 54 12 -56 3 0 -34 28 27 90 23
введите Х
0
Номер элемента 13

Самые новые вопросы

Другие предметы - 3 года назад

Сочинение-рассуждение. прочитайте текст. есть у меня внучка. однажды она говорит: — у веры в субботу день рождения. она

Другие предметы - 3 года назад

Л.н. толстой. как боролся русский богатырь как сказал иван о своей силе? найдите ответ в тексте. запишите.

История - 3 года назад

Кто такой мильтиад и какова его роль в победе над персами?

История - 3 года назад

Какие примеры н. м. карамзин использует для разъяснения пользы новой системы престолонаследия? согласны ли вы с позицией

География - 3 года назад

Дополните схему. она поможет вам лучше усвоить содержание §1.: 1 что изучает география 2 с помощью чего 3 зачем изучают