решить информатику Задание в документе.

#include <stdio.h>
#include <malloc.h>
void func(int *mas, int N)
{       
int l=0, r=N-1, i;       
while(l<r)       
{               
for(i=l; i<N; i++)                       
if(mas[i]<0)                               
break;               
l=i;               
for(i=r; i>=0; i--)                       
if(mas[i]>=0)                               
break;               
 r=i;               
if(l<r)               
 {                       
 int temp=mas[l];
 mas[l]=mas[r];
mas[r]=temp; 
               }       
 }
} 
int main()
{int *mas, N, i;printf("N= ");scanf("%d", &N);mas=(int*) malloc(N*sizeof(int));for(i=0;
i<N; i++)
{    printf("[%d]= ", i); 
   scanf("%d", &mas[i]);}func(mas, N);for(i=0; i<N; i++)    printf("%d ", mas[i]); 
   return 0;}

А)
алг А
нач
  цел N = 10
  целтаб a[1:N]
  цел i, s
 
  нц для i от 1 до N
    вывод "a[",i,"] = "
    ввод a[i]
  кц
  вывод нс
 
  s:=a[3]+a[5]
  вывод "s = ", s, нс
кон

Б)
алг Б
нач
  цел M = 10
  целтаб a[1:M]
  цел i, max
 
  нц для i от 1 до M
    вывод "a[",i,"] = "
    ввод a[i]
  кц
  вывод нс
 
  max:=a[1]
  нц для i от 2 до M
    если a[i] > max то
      max:=a[i]
    все
  кц
  вывод "max = ",max,нс
кон

В)
алг В
нач
  цел M = 10
  целтаб a[1:M]
  цел i, k
 
  нц для i от 1 до M
    вывод "a[",i,"] = "
    ввод a[i]
  кц
  вывод нс
 
  k:=0
  нц для i от 1 до M
    если mod(a[i],6)=0 то
      k:=k+1
    все
  кц
  если k>0 то
    вывод "k = ",k,нс
  иначе
    вывод "Нет чисел, кратных 6"
  все
кон
Г)
алг Г
нач
  цел N = 10
  целтаб a[1:N]
  цел i, p
 
  нц для i от 1 до N
    вывод "a[",i,"] = "
    ввод a[i]
  кц
  вывод нс
 
  p:=1
  нц для i от 1 до N
    если mod(a[i],2)=0 то
      p:=p*a[i]
    все
  кц
  вывод "p = ",p,нс
кон