Напишите функцию , которая вычисляет максимальное из чисел трёх чисел . числа вводятся с клавиатуры . используйте функцию . паскаль . !

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

function Max(a,b,c:real):=Max(Max(a,b),c);

begin
  var (x,y,z):=ReadReal3('Введите три числа через пробел:');
  Writeln('Максимальное из чисел равно ',Max(x,y,z))
end.

Значения элементов массива станут равны их индексам.

Объяснение:

Заполнение массива:

для i от 0 до 9 выполнить a[i] = 9 - i

i = 0       a[0] = 9 - 0 = 9

i = 1        a[1] = 9 - 1 = 8

i = 2       a[2] = 9 - 2 = 7

i = 3       a[3] = 9 - 3 = 6

i = 4       a[4] = 9 - 4 = 5

i = 5       a[5] = 9 - 5 = 4

i = 6       a[6] = 9 - 6 = 3

i = 7       a[7] = 9 - 7 = 2

i = 8       a[8] = 9 - 8 = 1

i = 9       a[9] = 9 - 9 = 0

Изменение массива:

для i от 0 до 4 выполнить

Действия в цикле:

1) k = a[i]

2) a[i] = a[9 - i]   (значение элемента a[9 - i] смотрим выше)

3) a[9 - i] = k

i = 0

Действия в цикле:

1) k = a[0] = 9

2) a[0] = a[9 - 0]       a[0] = a[9]       a[0] = 0

3) a[9 - 0] = k           a[9] = k            a[9] = 9

i = 1

Действия в цикле:

1) k = a[1] = 8

2) a[1] = a[9 - 1]       a[1] = a[8]       a[1] = 1

3) a[9 - 1] = k          a[8] = k           a[8] = 8

i = 2

Действия в цикле:

1) k = a[2] = 7

2) a[2] = a[9 - 2]       a[2] = a[7]       a[2] = 2

3) a[9 - 2] = k           a[7] = k           a[7] = 7

i = 3

Действия в цикле:

1) k = a[3] = 6

2) a[3] = a[9 - 3]       a[3] = a[6]       a[3] = 3

3) a[9 - 3] = k           a[6] = k           a[6] = 6

i = 4

Действия в цикле:

1) k = a[4] = 5

2) a[4] = a[9 - 4]       a[4] = a[5]       a[4] = 4

3) a[9 - 4] = k           a[5] = k           a[5] = 5

Значения элементов массива станут равны их индексам.

Объяснение:

Заполнение массива:

для i от 0 до 9 выполнить a[i] = 9 - i

i = 0       a[0] = 9 - 0 = 9

i = 1        a[1] = 9 - 1 = 8

i = 2       a[2] = 9 - 2 = 7

i = 3       a[3] = 9 - 3 = 6

i = 4       a[4] = 9 - 4 = 5

i = 5       a[5] = 9 - 5 = 4

i = 6       a[6] = 9 - 6 = 3

i = 7       a[7] = 9 - 7 = 2

i = 8       a[8] = 9 - 8 = 1

i = 9       a[9] = 9 - 9 = 0

Изменение массива:

для i от 0 до 4 выполнить

Действия в цикле:

1) k = a[i]

2) a[i] = a[9 - i]   (значение элемента a[9 - i] смотрим выше)

3) a[9 - i] = k

i = 0

Действия в цикле:

1) k = a[0] = 9

2) a[0] = a[9 - 0]       a[0] = a[9]       a[0] = 0

3) a[9 - 0] = k           a[9] = k            a[9] = 9

i = 1

Действия в цикле:

1) k = a[1] = 8

2) a[1] = a[9 - 1]       a[1] = a[8]       a[1] = 1

3) a[9 - 1] = k          a[8] = k           a[8] = 8

i = 2

Действия в цикле:

1) k = a[2] = 7

2) a[2] = a[9 - 2]       a[2] = a[7]       a[2] = 2

3) a[9 - 2] = k           a[7] = k           a[7] = 7

i = 3

Действия в цикле:

1) k = a[3] = 6

2) a[3] = a[9 - 3]       a[3] = a[6]       a[3] = 3

3) a[9 - 3] = k           a[6] = k           a[6] = 6

i = 4

Действия в цикле:

1) k = a[4] = 5

2) a[4] = a[9 - 4]       a[4] = a[5]       a[4] = 4

3) a[9 - 4] = k           a[5] = k           a[5] = 5