Question

Составить программу для решения следующей задачи: Дан массив целых чисел, заполненный случайными числами в диапазоне [-100, 100]. Замените все отрицательные элементы максимальным. Выведите на экран исходный и измененный массивы.

Answer 1

var
i,max:integer;
ar:array[0..200] of integer;

begin
randomize;
max:=0;

for i:=1 to 200 do begin
ar[i]:=random(200+1)-100;
if (ar[i] > max) then max:=ar[i];
if (i mod 20=0) then writeln(ar[i]) else write(ar[i],' ');
end;

writeln();

for i:=1 to 200 do begin 
if (ar[i] < 0) then ar[i]:=max; 
if (i mod 20=0) then writeln(ar[i]) else write(ar[i],' '); 
end;

end.

Answer 2

Программа для решения данной задачи может выглядеть следующим образом на языке Python:

import random

# Генерируем массив случайных чисел
arr = [random.randint(-100, 100) for _ in range(10)]

# Выводим исходный массив на экран
print("Исходный массив:", arr)

# Находим максимальный элемент в массиве
max_elem = max(arr)

# Заменяем все отрицательные элементы на максимальный
for i in range(len(arr)):
    if arr[i] < 0:
        arr[i] = max_elem

# Выводим измененный массив на экран
print("Измененный массив:", arr)

Эта программа создает массив из 10 случайных чисел в диапазоне от -100 до 100, затем находит максимальный элемент в массиве и заменяет все отрицательные элементы на максимальный. На выходе программа выводит исходный и измененный массивы.