Question

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

Answer 1

Ответ:

сначала надо отсортировать массив.

я отсортировал по убыванию и вывел первый элемент, т.е максимальный

Объяснение:

const

m = 10;

var a: array[1..m] of integer;

i,j:integer;

begin

for i:=1 to m do begin

  read(a[i]);

end;

for i:=1 to m-1 do

  for j:=1 to m-i  do

    if a[j] < a[j+1] then begin

      swap(a[j],a[j+1]);

    end;

    writeln;

 for i:=1 to m do

   write(a[i],' ');

   writeln;

   writeln(a[1]);

end.

Answer 2

PascalABC.NET

Кратчайшее решение:

• ### RAI(10).Max.Pr

Другое из множества возможных решений:

• ##
• var a := ReadArrInteger(10);
• var max := a.Max;
• Print('Максимальный элемент:', max)

Answer 3

Конечно, вот пример программы на языке Python, которая выполняет указанные действия:

pythonCopy code
# Создаем пустой массив для хранения 10 чисел
numbers = []

# Запрашиваем у пользователя ввод 10 чисел и добавляем их в массив
for i in range(10):
    num = float(input(f"Введите {i + 1}-е число: "))
    numbers.append(num)

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

# Выводим максимальный элемент на экран
print(f"Максимальный элемент: {max_number}")

Сначала программа создает пустой массив numbers, а затем с помощью цикла for запрашивает у пользователя ввод 10 чисел, каждое из которых добавляется в массив. После этого с использованием функции max() находим максимальное значение в массиве и выводим его на экран.