Помогите, нужно написать на языке Паскаль: известно что в массиве имеются элементы равные 5 определить номер первого из них
Ответы на вопрос
Ответил griferad
0
Program z;
Var mas:array[1..10] of integer;
i: integer;
Writeln('Введите массив: ');
for i:=1 to 10 do
Readln(mas[i])
for i:=1 to 10 do
if(mas[i]=5) then
Writeln('Элемент массива под номером',i,' равен пяти');
end;
Вот задача, по идее ошибок быть не должно.
Var mas:array[1..10] of integer;
i: integer;
Writeln('Введите массив: ');
for i:=1 to 10 do
Readln(mas[i])
for i:=1 to 10 do
if(mas[i]=5) then
Writeln('Элемент массива под номером',i,' равен пяти');
end;
Вот задача, по идее ошибок быть не должно.
Новые вопросы