Увибраному середовищі програмування створіть проект табель, у якому реа-
лізовано електронний табель. у проекті передбачте, що в лінійній таблиці
назви предметів, які вивчає учень. елементи іння екранної форми передба-
чають можливість за номером предмета дізнатись оцінку з відповідного предмета;
отримати дані про максимальну оцінку з предметів, що вивчаються; кількість пред-
метів, які мають найвищу та найнижчу оцінки; середній успішності.

Var a: byte; b:integer;
Begin 
writeln('Введите день месяца');
readln(b);
writeln('Введите номер месяца');   
Readln(a);    
          Case a of        
1: writeln(b,' янавря');        
2: writeln(b,' февраля');      
3: writeln(b,' марта ');        
4: writeln(b,' апреля ');      
5: writeln(b,' мая');      
6: writeln(b,' июня ');        
7: writeln(b,' июля');       
8: writeln(b,' августа');     
9: writeln(b,' сентября');     
10: writeln(b,' октября');     
11: writeln(b,' ноября');       
12: writeln(b,' декабря');     
else writeln('Месяца №', a,'нет');   
end;       
end.

#include <iostream>

#include <cmath>

#include <ctime>

using namespace std;

int main (void)

{

 srand (time (0));

 int Temp = 0;

 int max = 1;

 int maxi = 0;

 int n = 0;

 cout << "Input n = ";

 cin >> n;

 cout << endl;

 int *A = new int[n];

 for (int i = 0; i < n; i++)

   {

     A[i] = -10 + rand () % 30;

     cout << A[i] << "   ";

   }

 for (int i = 0; i < n; i++)

   {

     if (abs (A[i]) > abs (max))

{

  max = A[i];

  maxi = i;

}

   }

 cout << "\nABS(Max) = " << max << "  Number = " << maxi;

 Temp = A[n - 1];

 A[n - 1] = max;

 A[maxi] = Temp;

 cout << endl;

 for (int i = 0; i < n; i++)

   {

     cout << A[i] << "  ";

   }

 delete[]A;

}

Объяснение: