// PascalABC.NET
function ВерхнийТреугольник(Матрица: array[,] of integer):
sequence of integer;
begin
var ИндексMax := Матрица.RowCount - 1;
for var ИндексСтроки := 0 to ИндексMax - 1 do
for var ИндексСтолбца := ИндексСтроки + 1 to ИндексMax do
yield Матрица[ИндексСтроки, ИндексСтолбца]
end;
begin
var n := ReadInteger('N =');
var СлучайнаяМатрица := MatrRandom(n, n, -99, 99);
СлучайнаяМатрица.Println;
var ПоложительныеЭлементы :=
ВерхнийТреугольник(СлучайнаяМатрица)
.Where(Значение -> Значение > 0);
Println('Сумма положительных элементов равна',
ПоложительныеЭлементы.Sum);
Println('Число положительных элементов равно',
ПоложительныеЭлементы.Count)
end.
ответ: Тема «Правила ввода текста», гостиница «Малахит», шоколад «Алёнка», роман «Война и мир».
Этапы создания текстового документа: ввод, редактирование, форматирование.
Информация во Всемирной паутине организована в виде страниц (Web-стран).
Объяснение: Тема «Правила ввода текста», гостиница «Малахит», шоколад «Алёнка», роман «Война и мир».
Этапы создания текстового документа: ввод, редактирование, форматирование.
Информация во Всемирной паутине организована в виде страниц (Web-страниц).
Всё-таки, Мамин-Сибиряк, жар-птица, северо-восток, Ростов-на-Дону, Нью-Йорк. Пришлось волей-неволей остаться здесь на ночь. Горя бояться — счастья не видать. Москва — огромный город, город-страна. Конец XVII века — первая половина XIX века.иц).
Всё-таки, Мамин-Сибиряк, жар-птица, северо-восток, Ростов-на-Дону, Нью-Йорк. Пришлось волей-неволей остаться здесь на ночь. Горя бояться — счастья не видать. Москва — огромный город, город-страна. Конец XVII века — первая половина XIX века.
Деревом
Объяснение:
Так как в нём нет циклов