Помогите пожалуйста. 8_8. Дан массив. Найти первый локальный минимум (локальный минимум – элемент, который меньше своих соседей). 8_9. Дан массив А, получить массив В: А = {13, 7, 9 , 17 , 15 } -- больше В = {13, 7, 9 , 17 ...
Помогите пожалуйста.
8_8. Дан массив. Найти первый локальный минимум (локальный минимум – элемент, который меньше своих соседей).
8_9. Дан массив А, получить массив В:
А = {13, 7, 9 , 17 , 15 } --> В = {13, 7, 9 , 17 , 15 , 13, 7, 9 , 17 , 15 }
Гость
Ответ(ы) на вопрос:
Гость1)
var
a: array[1..100] of integer;
i,n: integer;
begin
writeln('Введите кол-во элементов массива');
readln(n);
writeln('Массив:');
for i:=1 to n do
begin
a[i]:= random(50)+1;
write(a[i],' ' );
end;
writeln;
if a[1]
Не нашли ответ?
Похожие вопросы