Создать массив из 10 элементов. заполнить n его элементов случайными целыми числами из диапазона от 0 до 10 и вывести на экран в строку через пробел. в следующей строке вывести индекс первого элемента массива с наибольшим значением. в следующей строке вывести индекс последнего элемента массива с наибольшим значением. в паскале

program arrmax;

var

 i, i1, i2, amax: Integer;

 a: array [1..10] of integer;

begin

 Randomize;

 for i := 1 to 10 do  // заполнение массива случайными числами

   a [i] := Random (11);

 for i := 1 to 10 do   // вывод на экран элементов массива

   Write (a [i], ' ');

 amax := -1;

 i1 := -1;

 for i := 1 to 10 do   // поиск первого максимального элемента

   if a [i] > amax then begin

     amax := a [i];

     i1 := i;

   end;

 WriteLn;

 WriteLn ('Индекс первого элемента массива с наибольшим значением = ', i1);

 amax := -1;

 i2 := -1;

 for i := 10 downto 1 do   // поиск последнего максимального элемента

   if a [i] > amax then begin

     amax := a [i];

     i2 := i;

   end;

 WriteLn ('Индекс последнего элемента массива с наибольшим значением = ', i2);

 ReadLn;

end.

Объяснение:

Всего существует 16 (ну лично я смогла только эти найти) вариантов форматирование слова.
1) Шрифт 1
2) Шрифт 2
3) Шрифт 1; полужирное
4) Шрифт 2; полужирное
5) Шрифт 1; полужирный; курсив
6) Шрифт 2; полужирный; курсив
7) Шрифт 1; полужирный; курсив; подчеркнутое
8) Шрифт 2; полужирный; курсив; подчеркнутое
9) Шрифт 1; курсив
10) Шрифт 2; курсив
11) Шрифт 1; курсив; подчеркнутое
12) Шрифт 2; курсив; подчеркнутое
13) Шрифт 1; подчеркнутое
14) Шрифт 2; подчеркнутое
15) Шрифт 1; полужирный; подчеркнутое
16) Шрифт 2; полужирный; подчеркнутое

Объяснение:

Схе́ма Го́рнера (или правило Горнера, метод Горнера, метод Руффини-Горнера) — алгоритм вычисления значения многочлена, записанного в виде суммы мономов (одночленов), при заданном значении переменной. Метод Горнера позволяет найти корни многочлена[1], а также вычислить производные полинома в заданной точке. Схема Горнера также является простым алгоритмом для деления многочлена на бином вида {\displaystyle x-c}x-c. Метод назван в честь Уильяма Джорджа Горнера, однако Паоло Руффини опередил Горнера на 15 лет, а китайцам этот был известен еще в XIII веке.