Помогите пожалуйста!На языке Паскаль

В одномерном массиве, состоящем из п вещественных элементов, вычислить:

1.  Количество элементов массива, равных нулю.

2.         Сумму элементов массива, расположенных после минимального элемента. Упорядочить элементы массива по возрастанию модулей.

примерный смысл должен быть понятен. Писал с телефона, возможны опечаткиvar i,n,k,z,sum:real;a:array[1..n];beginfor i=1 to n doif a[i]=0 then k=k+1end;for i=1 to n doif a[i]<z then z:=i;end;for i := z to n do read(a[i]);sum := 0;  for i := 1 to n do sum := sum + a[i];end.