М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Написать блок схему и программу(паскаль abc).Есть матрица 3 на 4. Необходимо с этой матрицы перевести одомерный массив все числа которые кратны 2 и 3.

👇
Открыть все ответы
Ответ:
Ди1233
Ди1233
08.08.2022

PascalABC.NET 3.5.1 + .NET Framework 4.7.1

#1

begin

 var n := ReadInteger();

 var a := Range(1, n);

 //Sum

 a.Sum.Println;

 //произведение

 a.Aggregate(BigInteger.One, (p, q) -> p * q).Println;

 //Кол-во кратных 2 и 3

 a.Where(p -> (p mod 2 = 0) and (p mod 3 = 0)).Count.Println;

 //Среднее ряда

 a.Average.Round.Println

end.

#2

begin

 var A := ReadArrInteger(10);

 A.Println;

 //максимум

 A.Max.Println;

 //Сумма кратных 2 и 3

 A.Where(p -> (p mod 2 = 0) and (p mod 3 = 0)).Sum.Println

end.

4,6(13 оценок)
Ответ:
marha18
marha18
08.08.2022
1. Программное обеспечение - совокупность программ системы обработки информации и программных документов, необходимых для эксплуатации этих программ (определение из ГОСТа).
ПО служит для выполнения определённых задач пользователя, используя ресурсы устройств компьютера.

2. Сообщение указывает, что на диске не обнаружена операционная система.

3. На разных дисках могут быть установлены разные системы. Если бы для переключения надо было бы каждый раз лезть внутрь компьютера, было бы неудобно. Кроме того, один диск может быть резервным, загрузка будет проходить с него, если загрузка с основного диска закончилась неудачно, чтобы провести тестирование системы, провести откат к предыдущим настройкам или установить новую операционную систему.
4,6(2 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ