Предмет: История, автор: AlinaMayer666

Помогите пожалуйста(
Каковы основные направления общественной мысли и движения 19 века?

Ответы

Автор ответа: fodi4
1

Объяснение:

1.Консервативное. 2.Либеральное. 3. Демократическое.


AlinaMayer666: Спасибки
Автор ответа: nadyasmart
1

Ответ:

основные идеологии XlX века .Основными идеологами этой эпохи были:

Консерватизм

Либерализм

Утопический социализм

Радикализм Марксизм.

Консерватизм - сохранение. общественных и государственных традиций. Либерализм - не цыпле мость прав и свобод человека запятая. Либеральные реформа запятая. либеральный курс.


AlinaMayer666: Вы походу в голосовуху говорили)
AlinaMayer666: Спасибо >
fodi4: :D
nadyasmart: не за что
Интересные вопросы
Предмет: Английский язык, автор: роси2
Предмет: Математика, автор: 123454657
Предмет: Информатика, автор: Яна999
Помогите пожалуйста! Язык VBA. Не могу задать замену окончательной суммы.
Задача:
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 100 включительно. Опишите на VBA алгоритм, который находит сумму элементов массива меньших 80 и при этом, кратных 5, а затем заменяет каждый такой элемент на число, равное найденной сумме. Гарантируется, что хотя бы один такой элемент в массиве есть. В качестве результата необходимо вывести измененный массив, каждый элемент выводится с новой строчки. Например, для исходного массива из шести элементов:
14
15
27
20
95
4
программа должна вывести следующий массив
14
35
27
35
95
4

Sub program()
Dim a(1 To 30) As Integer, i As Integer, Sum As Integer

For i = 1 To 30
a(i) = Int(100 * Rnd)
Sheets("Лист1").Cells(i, 1) = a(i)
Next i

Sum = 0
For i = 1 To 30
If a(i) < 80 And a(i) Mod 5 = 0 Then
Sum = Sum + a(i)
a(i) = Sum
End If
Sheets("Лист1").Cells(i, 2) = a(i)
Next i

Sheets("Лист1").Cells(1, 3) = Sum
End Sub