const
n = 9; //константа может быть любой
type
mas = array[0..n] of integer; //тип задал только для процедуры, без подпрограмм отдельный тип не нужен
procedure copy_mas(var a, b: mas);
var
i, i1: integer;
begin
i1 : = 0;
for i : = 0 to n do
if (a[i] > = 0) and (a[i] < = 10) then
begin
b[i1] : = a[i];
i1 += 1;
end;
end;
Объяснение:
#include <stdio.h>
int main()
{
int i,n;
int* arr;
double sum=0;
printf("N=");
scanf("%d",&n);
arr = (int*)malloc(n*sizeof(int));
printf("Entering the array:\n");
for(i=0;i<n;i++)
scanf("%d",&arr[i]);
for(i=0;i<n;i++)
if( arr[i]%2 == 0)
sum+=arr[i];
printf("Sredneje arf: %.2f\n",sum/2);
free(arr);
return 0;
}