Помогите с прогой по массивам.
Задача: Записать число локальных минимумов. (число меньше своих соседей)
Задача: Записать число локальных минимумов. (число меньше своих соседей)
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
begin
write ('Первоначальный случайный массив: ');
var a:=arrrandom (random(5, 10), -100, 100); a.Println;
var count:=0;
for var i:=1 to length(a)-2 do if (a[i]<a[i-1]) and (a[i]<a[i+1]) then count+=1;
write ('Локальных минимумов: ', count);
end.