написать программы в поскале Футболисты одной команды забили за сезон следующее количество мячей: 15 м.,
9 м., 8 м., 10 м., 12 М., 13 м., 4 м, 7 м. Определите:
а) общую результативность команды;
б) результативность лучших игроков команды, забивших больше 10 мячей;
в) результат лучшего бомбардира команды;
г) количество футболистов, забивших меньше 10 мячей;
д) порядковый номер самого мало результативного игрока.​

За что и возьмём: I = 2 бита, p - некая вероятность того, что ученик получил пятёрку. Тогда: 2 = log2(1/p) - решаем обычное логарифмическое уравнение log2(4) = log2(1/p) 4 = 1/p p = 1/4 Но ведь вероятность получения пятёрки рассчитывается как: кол-во пятёрок делённое на суммарное кол-во оценок. Какой из этого вывод? ! Известна вероятность, известно суммарное кол-во оценок - неизвестно кол-во оценок. Всё тривиально просто - нам уравнение с одной неизвестной: x / 100 = 1/4 Где, как ты уже поняла: x - кол-во пятёрок, 100 - суммарное кол-во оценок и 1/4 наша некая вероятность. Решаем уравнение: x = 100/4 = 25 Значит, ученик получил 25 пятёрок. 

//Dev-C++ 4.9.9.2

//а
#include <iostream>
using namespace std;

const int n=10;

int main(){
         int ar[n];
         int arsub[n];
         int m=0;
         cout<<"Enter m:";
         cin>>m;
         cout<<"Enter array:"<<endl;
         for(int i=0;i<n;i++)
          cin>>ar[i];
         for(int i=0;i<m;i++)
          arsub[i]=ar[i];
         for(int i=0;i<n-m;i++)
          ar[i]=ar[i+m];
         for(int i=0;i<m;i++)
          ar[i+(n-m)]=arsub[i];
         cout<<"Final array"<<endl;
         for(int i=0;i<n;i++)
          cout<<ar[i]<<' ';
        cin.get();
        cin.get();
 return 0;
}

//б
#include <iostream>
using namespace std;

const int n=10;

int main(){
         int ar[n];
         int arsub[n];
         int k,k1=0;
         cout<<"Enter k:";
         cin>>k;
         cout<<"Enter array:"<<endl;
         for(int i=0;i<n;i++)
          cin>>ar[i];
         for(int i=n-k;i<n;i++){
          arsub[k1]=ar[i];k1++;}
         for(int i=n;i>=k;i--)
          ar[i]=ar[i-k];
         for(int i=0;i<k;i++)
          ar[i]=arsub[i];
         cout<<"Final array"<<endl;
         for(int i=0;i<n;i++)
          cout<<ar[i]<<' ';
        cin.get();
        cin.get();
 return 0;
}