Ответы на вопрос:
===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var a := ArrRandom(n, -99, 99);
a.Println;
a.Transform(x -> 2 * x); // вот удвоение
a.Print
end.
21
1
Удвоить все положительные элементы массива ответов 2
Метки нет (Все метки)

Задание :
Тип массива - целый; число элементов - 10.
Постановка задачи:
1 - Организовать ввод массива заданного размера.;
2 - Посчитать сумму всех членов массива ;
3 - Найти максимальный и минимальный элемент массива;
4 - вывести введенный массив;
5 - все положительные элементы массива удвоить, все отрицательные элементы заменить на значения их индексов. Вывести преобразованный массив.
При использовании 65536 цветов для одной точки требуется log(2)65536 = 16 бит; при использовании 16 цветов - log(2)16 = 4 бита. следовательно, после преобразования объем памяти уменьшится в 16/4 = 4 раза
Популярно: Информатика
-
artemchik2524.10.2020 23:47
-
dnabib22.08.2020 02:03
-
ХлойкаПрайс29.10.2021 09:00
-
Stevejobs111111.07.2021 02:32
-
mihail2001214.11.2022 22:37
-
Серый43а13.03.2020 11:14
-
ПеЧеНьКаСМоЛоЧкОм09.12.2021 19:05
-
юля275930.03.2021 20:38
-
ilonamoon200011.06.2021 07:42
-
Fastik2628.01.2023 19:33