ответ: 4. Но т.к. тут надо минимум 20 символов, вот интересный факт: Кошки эволюционировали в отдельную семью (Felidae) примерно 25 миллионов лет назад. С тех пор они распространялись по всему миру и менялись, чтобы соответствовать своей среде обитания.
// PascalABC.NET 3.2, сборка 1407 от 18.03.2017 // Внимание! Если программа не работает, обновите версию!
begin var a:=MatrRandom(20,30,-30,50); a.Println(4); Writeln(4*a.ColCount*'-'); Write('Положительных по строкам: '); a.Rows.Select(r->r.Where(e->e>0).Count).Println; Write('Отрицательных по строкам: '); a.Rows.Select(r->r.Where(e->e<0).Count).Println; Write('Средние четных по строкам: '); a.Rows.Select(x->x.Where(y->y.IsEven).Average). Select(avg->Format('{0:f4}',avg)).Println; end.
begin var y:=ReadArrReal('2008:',12); var z:=ReadArrReal('2009:',12); var d:=y.Average-z.Average; if d>0 then Writeln('2008 теплее') else if d<0 then Writeln('2009 теплее') else Writeln('Оба года имеют одинаковую среднюю температуру') end.
![Задан 2d массив целых чисел (20х30) со значениями на [-30; 50] нужно уметь генерировать случайные, р](/tpl/images/0731/6891/b5c7e.jpg)
