Помогите пожалуйста!** языке Паскаль В одномерном массиве, состоящем из п вещественных...

0 голосов
37 просмотров

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

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

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

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


Информатика (72 баллов) | 37 просмотров
Дан 1 ответ
0 голосов

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

(23 баллов)