Question

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

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

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

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

Answer 1

примерный смысл должен быть понятен. Писал с телефона, возможны опечатки
var i,n,k,z,sum:real;
a:array[1..n];
begin
for i=1 to n do
if a[i]=0 then k=k+1
end;
for i=1 to n do
if 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.