Информатика, вопрос задал nomokonjar , 7 лет назад

Напишите программу, которая заполняет массив N=10 элементов случайными числами в диапозоне[10,50], выводит его на экран, а затем находит индексы всех элементов,равных введенному числу X. Программа должна вывести ответ"не найден", если в массиве таких элементов нет.

Ответы на вопрос

Ответил KnowsUser1
0

Ответ:

begin

 var A := ArrRandom(10, 10, 50);

 A.Println;

 var X := ReadInteger();

 var ind := A.Indices(p -> p = X);

 if ind.Count > 0 then print(ind) else print('таких нет');

end.

Объяснение:

Ответил KnowsUser1
0
Массив там не [10, 50, 10], а состоящий из 10 целочисленных элементов, имеющих случайное значение в диапазоне от 10 до 50)))
Новые вопросы