Сделать программу в Pascal.1. Организуйте ввод и вывод одномерного массива в строку, в столбец.2. Найдите произведение ненулевых элементов одномерного массива.3. Найдите количество элементов одномерного массива, чьи значения лежат в пределах от - 5 до 5 включительно.4. Выведите индексы нулевых элементов одномерного массива. Выходные данные оформите в виде:Нулевые элементы массива находятся на 2, 3, 5, 8 местах.

Ответы (1)

Арикназ 27.06.2023 0
beginvar a : = Arr (1, 0, 2, 0, 3, 0, 4, 0, 5) ;Println ('в строку:') ; a. Println;Println ('в столбец:') ; a. Println (Newline) ;Println ('произведение ненулевых элементов:') ;a. Where (x - > x 0). Aggregate (1, (p, x) - > p * x). Println;Println ('кол-во элементов со значениями в пределах (-5, 5) : ') ;a. Where (x - > x. InRange (-5, 5)). Count. Println;Println ('нулевые элементы находятся на местах:') ;a. IndexesOf (x - > x = 0). Select (x - > x + 1). Println;end.

Знаете правильный ответ?

Думаешь ответы не верны?

Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.

Воспользуйтесь поиском

Новые вопросы по предмету Информатика:

ПРЕДМЕТЫ