С+ + Напишите программу, которая выводит номера элементов массива, равных заданному значению X. Входные данные Первая строка содержит размер массива N. Во второй строке через пробел задаются N чисел - элементы массива. В третьей строке записано число X. Гарантируется, что 0 < N ≤ 10000. Выходные данные Программа должна вывести в одной строке номера элементов массива, равных X, разделив их пробелами. Предполагается, что нумерация начинается с единицы. Если таких элементов нет, нужно вывести число - 1.

Question

Демьян Малахов

Информатика

6 октября, 23:51

С+ + Напишите программу, которая выводит номера элементов массива, равных заданному значению X. Входные данные Первая строка содержит размер массива N. Во второй строке через пробел задаются N чисел - элементы массива. В третьей строке записано число X. Гарантируется, что 0 < N ≤ 10000. Выходные данные Программа должна вывести в одной строке номера элементов массива, равных X, разделив их пробелами. Предполагается, что нумерация начинается с единицы. Если таких элементов нет, нужно вывести число - 1.

+4

Ответы (1)

Знаешь ответ на этот вопрос?

Софья Мухина · Answer 1

Var a:array[1 ... 10000] of integer;

n, x, i, k:integer;

begin

read (n);

k:=0;

for i:=1 to n do read (a[i]);

read (x);

for i:=1 to n do

if a[i]=x then begin

k:=k+1;

write (i,' ');

end;

if k=0 then write (-1);

end.