30 беттік реферат word мәтіндік процессорының көмегімен компьютерде жазылған.Оның әр беті-40 жолдан,ал әр жолы 50 таңбадан тұрады,рефераттын ақпараттық көлемі қандай?​

// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var d:=MatrRandom(m,n,-99,99);
  d.Println(4); Writeln(4*d.ColCount*'-');
  var min:=d.ElementsByRow.Min; // значение минимального элемента
  Writeln('Искомое среднее: ',d.ElementsByRow.Where(t->t<>min).Average)
end.

Пример
Количество строк и столбцов в массиве: 4 7
*** Исходный массив ***
   7 -31  80  21  38 -36  16
  42  93 -11  74  -6  37 -71
  15  90 -71 -88 -71  70 -27
  12  83  41  79  72  91 -88

Искомое среднее: 24.5

/*

   Методов решения много, самый но длинный - это switch ... case..

   Можно было использовать map из STL

*/

#include <iostream>

#include <vector>

#include <sstream>

using namespace std;

int main()

{

   int number;

   cin>>number;

   switch (number){

   case 1:

       cout<<"Понедельник\n";

       break;

   case 2:

       cout<<"Вторник\n";

       break;

   case 3:

       cout<<"Среда\n";

       break;

   case 4:

       cout<<"Четверг\n";

       break;

   case 5:

       cout<<"Пятница\n";

       break;

   case 6:

       cout<<"Суббота\n";

       break;

   case 7:

       cout<<"Воскресенье\n";

       break;

   default:

       cout<<"Нет дня недели под этим номером";

   }

   return 0;

}

Краткий гайд:

number - переменная, отвечает за номер дня неделиswitch - case - оператор множественного выбора. Подробнее читаем на cppstudio.com, cppreference.com или других порталах