Написать программу поиска номера элемента массива, принадлежащего заданному промежутку [1, 5], используя линейный поиск.решить на pascal abc. пример: линейный поиск элементов массива: procedure poisk (z: omas; x: integer); var i,p: byte; begin for i: =1 to n do begin if z[i]=x then p: =i; end; end;

rulmich1203p0dlzb rulmich1203p0dlzb    2   30.07.2019 03:50    0

Ответы
КотикОцелотик1 КотикОцелотик1  25.08.2020 16:21
Const n = 5;
var
i, p, x:byte;
z: array[1..n] of byte;
begin
readln(x);
for i:=1 to n do
begin
readln(z[i]);
if z[i]=x then p:=i;
end;
writeln(p);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика