Пояснение:
Сумма будет максимальной в том случае, если будут суммированы два самых больших числа в массива. То есть необходимо их найти и вывести их индексы. Программа снизу как раз это и вычисляет через два прохода цикла for
a = [] #объявление списка
n = 10 #кол-во элементов в списке
for i in range(0,n): #заполнение списка
a.append(int(input('Введите ['+ str(i) + "] элемент: ")))
max_number = 0 #устанавливаем начальный индекс макс. эл.
for i in range(n-1): #поиск индекса макс. эл.
if(a[max_number] < a[i+1]):
max_number = i+1
if(max_number == 0): #если индекс макс. эл = 0
pre_max_number = 1 #начальный индекс второго макс. эл. = 1
else: pre_max_number = 0 #иначе 0
for j in range(n-1): #поиск индекса второго макс. эл.
if(j+1 != max_number and a[pre_max_number] < a[j+1]):
pre_max_number = j+1
print(max_number, pre_max_number) #вывод их на экран
Вы вводите 2 целочисленные переменные: k, m
И объявляете целочисленный массив: Dat , в котором выделяется память под 10 ячеек.
Далее вы присваиваете каждому элементу массива Dat, собственное значение A[1] := 20, A[4] := 36 и т.д
После этого вы присваиваете m значение 1
И создаете цикл от 1 до 10, в котором у вас происходит сравнение элемента A[k] и элемента A[m]. В случае, если А[k] < A[m]. То вы добавляете к переменной m единицу.
После этого цикла, вы выводите на экран это самое m, которое по сути показывает количество чисел, которые больше чем предыдущее
var
a,b:integer;
begin
readln(a);
readln(b);
writeln(a div b);
writeln(a mod b);
end.