Владимир Мономах – великий князь киевский (1113-1125 гг.), государственный деятель, военачальник, писатель, мыслитель. Княжение Владимира Мономаха было периодом последнего усиления Киевской Руси. Владимир Мономах через своих сыновей управлял 3/4 ее территории. Стабильность в государстве держалась на авторитете Мономаха, который он заслужил в борьбе с половцами, а также концентрации большей части земель Древнерусского государства в руках киевского князя
Животный мир и растительность стран Африки охраняются в национальных парках, заповедниках и резерватах (общим числом около 150). В них ведется научная работа по изучению фауны и флоры. В некоторых парках (особенно если численность животных превышает емкость кормовой базы) выдаются государственные лицензии на их отстрел. Территории многих парков охраняются плохо, в них очень велик урон от браконьеров. Самые крупные национальные парки находятся в странах Восточной и Южной Африки. Это национальные парки Рувензори (Уганда) и Вирунга (на границе Заира и Руанды), где охраняются приматы, национальные парки Цаво (Кения), Серенгети (Танзания), Кафуэ (Замбия), Калахари - Хемсбок (Ботсвана) и Крюгера в ЮАР. Особо следует упомянуть охраняемые территории пустыни Намиб (Намибия, Ангола), где растет уникальная вельвичия.
Sub aaa() Dim i As Integer, j As Integer, d ReDim q(1 To 3, 1 To 2) For i = 1 To 3 For j = 1 To 2 q(i, j) = InputBox("Введите элемент (" + Str(i) + "," + Str(j) + ")") Next j Next i Cells(1, 1).Value = "Исходный массив" Range(Cells(2, 1), Cells(4, 2)).Value = q Cells(5, 1).Value = "Результирующий массив" For i = 1 To 3 If q(i, 1) > q(i, 2) Then d = q(i, 1): q(i, 1) = q(i, 2): q(i, 2) = d End If Next i Range(Cells(6, 1), Cells(8, 2)).Value = q End Sub
