Const n=20;
Type vector= array[1..n] of integer;
Вычислить для вектора x:
1) max x[i], i=1,2...n
2) x[1]^2 + x[3]^2 + ... + x[2n-1]^2
3) x[1]*x[n] + x[2]*x[n-1] + ... + x[n]*x[1]
4) x[n]*(x[n] + x[n-1])*(x[n] + x[n-1] + x[n-2])* ... *(x[n] + ... + x[1])
5) Среднее геометрическое |x[1]*x[2]*...x[n]| (корень n степени из модуля произведения)
6) true, если элементы массива x упорядочены строго по возрастанию, false в противном случае
7) true, если элементы массива x не содержат 0, false в противном случае
8) true, если элементы массива x чередуются по знаку (положительные, отрицательные)
9) x[1] + x[1]*x[2] + x[1]*x[2]*x[3] + ... + x[1]*x[2]*...*x[n]
10) номер первого отрицательного элемента массива х, или 0, если такого элемента нет
11) количество четных положительных элементов массива х
12) номер первого нулевого элемента, стоящего после отрицательного элемента, или 0, если такого элемента нет.
13) количество нулевых элементов, стоящих после отрицательных злементов.
14) x[n]^3 + x[n-1]^3 + x[n-2]^3 + ... + x[1]^3
15) Среднее арифметическое всех элементов массива x[i]
16) true, если элементы массива x четные и положительные, false в противном случае
17) true, если элементы массива x кратны 10, false в противном случае
18) true, если элементы массива x чередуются по четности (четные, нечетные)
19) x[1]^1 + x[2]^2 + x[3]^3 + ... + x[n]^n
20) номер последнего положительного элемента массива х, или 0, если такого элемента нет
21) количество элементов массива х, кратных 7
22) номер последнего нулевого элемента или 0, если такого элемента нет.
23) количество нулевых элементов, стоящих после положительных злементов.
24) min (x[i]^i), i=1,2...n
25) x[1]*1! + x[2]*2! + ... + x[n]*n!
26) (x[1] + x[2] + ... + x[n])/(x[1]*x[2]*...*x[n])
27) x[n]^1 + x[n-1]^2 + x[n-2]^3 + ... + x[1]^n
28) Сумму всех отрицательных элементов массива, стоящих на четных местах.
29) Произведение всех положительных элементов массива, которые кратны 17.
30) Среднее арифметическое всех элементов массива, которые положительные и четные.