Найти элемент массива и выдать информацию о его расположении - Pascal ABC

Формулировка задачи:

Условие: В неупорядоченном наборе данных (элементах линейного массива) найти, используя процедуру поиска, элемент, имеющий значение -4, и выдать информацию о расположении данного элемента в массиве. Количество элементов массива равно 10. Не могу понять как выдать расположение данного элемента.

Решение задачи: «Найти элемент массива и выдать информацию о его расположении»

textual
                            Листинг программы 
                        
 
                        
                          
                    
const n=10;
var mas:array[1..n] of integer;
   i:integer;
begin
randomize;
writeln('Массив');
for i:=1 to n do
 begin
  mas[i]:=-10+random(10);
  write(mas[i]:4);
 end;
writeln;
i:=1;
while (i<=n)and(mas[i]<>-4) do i:=i+1;
if i>n then write('Нет такого элемента')
else write(i);
end.

Оцени полезность:

10 голосов , оценка 4.1 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы