Сколько в себя вмещает 1 текстовый документ ( txt ) и как сделать чтобы он вмещал больше информации.

Панель и персонализация/параметры папок,в вкладке вид там почти в конце "скрывать расширения для зарегистрированных типов файлов" там галочку убери

Program asd; uses crt; const n=5; var a: array[1..n] of integer; var p,s: real;   i: integer; begin clrscr; for i: =1 to n do   begin  a[i]: =random(100)+1;     write(a[i]: 4);   end;   p: =1;     for i: =1 to n do    begin    if a[i] mod 3=0 then    begin    s: =s+a[i];   p: =p*a[i];   end;     end;     writeln;   writeln('сумма матрицы: ',s,' произведение матрицы: ',p); end.

Допустим в январе 31 день. предположим что осадки это целые числа и число 0 свидетельствует об отсутствии осадков.вот функция возвращающая дни без осадковкод c#1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 private int[] netosadkov(ref int[]pogoda)         {             int[] error = {-1};             int[] pogodabezosadkov = { 0 };             list< int> osadki = new list< int> ();             int netosadkov = 0;                     if (pogoda.length < 31)             {                 return error;             }             for (int i = 0; i < pogoda.length; i++ )             {                 if (pogoda[i] == netosadkov)                 {                     osadki.add(i+1);                 }             }             pogodabezosadkov = osadki.toarray();             return pogodabezosadkov;         }