Набери текст «Фрагмент текста»
Найди значение слов «каньон», «хорал», «Кервуд»
Сделай на эти слова сноски
Сделай скриншоты работы или сфотографируй и отправь на проверку

Текст:
В девять часов они достигли конца долины Тера. Прямо за ним поднималась гора
, и здесь ручей, по которому они шли, резко поворачивал на запад.
углубляясь в узкий каньон. На востоке виднелся зеленый пологий склон
, по которому лошади легко могли бы пройти и который привел бы их в
следующую долину, к Плавнику. Именно этого направления Брюс
и решил придерживаться.
На середине склона они остановились, чтобы дать лошадям передохнуть. -
жалобно крикнул Мускава из своей кожаной тюрьмы. Лэнгдон слышал, но не казался
обращать хоть малейшее внимание на плач. Он не сводил с нее глаз и продолжал:
Он смотрел на долину, через которую они только что .
В лучах утреннего солнца она была великолепна. Отсюда
были хорошо видны заснеженные вершины , под которыми лежало прохладное темное озеро, где Тор
недавно ловил рыбу. Далекие зеленые склоны гор казались бархатистыми, и
Лэнгдон подумал, что это последний раз, когда он слышит
зыбкую музыку земли Тора. И это подействовало на него, как хорал, как
радостный гимн в честь того, что он уезжает отсюда, не нарушал жизни гор
и долин, оставляя все, как было до его приезда.
(отрывок из рассказа о Гризли Джеймса Оливера Кервуда)​

Var a: array[1..10] of integer;
    b: array[1..10] of real;
    i,n: integer;
    s: real;
begin
  s:=0; n:=0;
  write('массив a:  ');
  for i:=1 to 10 do
  begin
    read(a[i]);
    if a[i]<0 then 
    begin
      s:=s+a[i];
      n:=n+1;
    end;  
    write(a[i],' ');
  end;
  s:=s/n; 
  writeln;
  writeln('среднее арифметическое отрицательных: ',s);
  writeln('количество отрицательных: ',n);
  write('массив b:  ');
  for i:=1 to 10 do
  begin
    if a[i]<0 then b[i]:=s
    else b[i]:=a[i];
    write(b[i]:7:3);
  end;
end.

массив a:  2 2 -3 1 -5 -6 -5 9 -7 5 
среднее арифметическое отрицательных: -5.2
количество отрицательных: 5
массив b:    2.000  2.000 -5.200  1.000 -5.200 -5.200 -5.200  9.000 -5.200 5.000

Static void Main(string[] args) 
       {
            int[,] arr = new int[3, 3];
            Random c = new Random(DateTime.Now.Millisecond);
            for (int i = 0; i < 3; i++)                           
                     for (int j = 0; j < 3; j++)
                          arr[i, j] = c.Next(1, 9);          //заполнение матрицы
                                                                   //тебе это не надо, т.к. она дана           
            //заданный интервал
            int a = 3;
            int b = 3;
            int sum = 0;
            int proizvedenie = 1;
            for (int i = 0; i < a; i++)
            {
                for (int j = 0; j < b; j++)
                {
                    sum += arr[i, j];
                    proizvedenie *= arr[i, j];
                }
            }
            Console.WriteLine("Матрица:");
            Console.WriteLine("{0} {1} {2}", arr[0, 0], arr[0, 1], arr[0, 2]);                   Console.WriteLine("{0} {1} {2}", arr[1, 0], arr[1, 1], arr[1, 2]);            Console.WriteLine("{0} {1} {2}", arr[2, 0], arr[2, 1], arr[2, 2]);            Console.WriteLine("Сумма = {0}", sum);            Console.WriteLine("Произведение = {0}", proizvedenie);            Console.ReadLine();     
   }
}