%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /www/old2/_music/
Upload File :
Create Path :
Current File : /www/old2/_music/kritak.txt

#define N 15
#define M 42

#include <stdio.h>
#include <stdlib.h>
#include <time.h>

void init(double *P, int len)
{
    srand ( time(NULL) );
    for(int i = 0; i < len; i++)
    {
        P[i] = rand() % M; 
    }    
}   

void print(double *P, int len)
{
    for(int i = 0; i < len; i++)
    {
        printf("%g ", P[i]);      
    }
    printf("\n");    
}

double alfa(double *P, int len)
{
    double sum = 0;
    int cnt = 0;
    for(int i = 0; i < len; i++)
    {
        cnt++;
        sum += P[i];
    }
    return sum / cnt;
}

void filtr(double *P, int len, double alfa)
{
    for(int i = 0; i < len; i++)
    {
        if(P[i] > alfa)
        {
            P[i] /= 2;
        }
    }   
}

int main()
{
   double pole[N];
   double a = 0;
   init(pole, N);
   print(pole, N);
   a = alfa(pole, N);
   printf("Alfa=%g\n", a);
   filtr(pole, N, a);
   print(pole, N); 
   
   return 0;
}

Zerion Mini Shell 1.0