Написать алгоритмы нахождения суммы, произведения всех элементов массива и поиска максимального элемента массива

1.

алг сумма

нач цел sum=0, i, цел таб a[1:5]

вывод "Введите 5 элементов массива:"

нц для i от 1 до 5

ввод a[i]

кц

нц для i от 1 до 5

sum:=sum+a[i]

кц

вывод sum

кон

2.

алг произведение

нач цел mult=1, i, цел таб a[1:5]

вывод "Введите 5 элементов массива:"

нц для i от 1 до 5

ввод a[i]

кц

нц для i от 1 до 5

mult:=mult*a[i]

кц

вывод mult

кон

3.

алг максимум

нач цел макс, i, цел таб a[1:5]

вывод "Введите 5 элементов массива:"

нц для i от 1 до 5

ввод a[i]

кц

макс:=a[1]

нц для i от 2 до 5

если a[i]>макс то

макс:=a[i]

все

кц

вывод макс

кон