Решить задачу в Паскале методом поиска с барьером. Без использования оператора random.
Дан массив из N целых чисел. найти номер первого элемента ,который меньше 10.
Дан массив из N целых чисел. найти номер первого элемента ,который меньше 10.
More Questions From This User See All
Answers & Comments
var a :array [1..n] of integer; i :integer;
begin
for i:= 1 to n do readln(a[i]); for i:= 1 to n do if a[i] < 10 then begin writeln(i); break; end;
end.