Написать программу в pascal. задан двумерный массив c из 3-х строк и 5-и столбцов. составить программу, которая вычисляет произведение всех элементов массива. затем организовать новый массив с, в котором значения элементов, лежащих на главной диагонали, равны 1, а остальные элементы равны квадрату соответствующих элементов исходного массива с.

187

293

Посмотреть ответы 2

Ответы на вопрос:

Нурлы11

Информатика

4,7(32 оценок)

// pascalabc.net 3.3, сборка 1590 от 03.12.2017 // внимание! если программа не работает, обновите версию! begin writeln('*** исходный массив ***'); var c: =matrrandom(3,5,-9,9); c.println(4); writeln(4*c.colcount*'-'); writeln('произведение элементов: ', c.elementsbyrow.aggregate(int64(,y)-> x*y)); writeln('*** массив-результат ***'); c.transform(t-> t*t); for var i: =0 to c.rowcount-1 do c[i,i]: =1; c.println(4) end. пример *** исходный массив *** -7 -3 4 -1 -5 9 1 9 2 4 -3 -3 -1 -4 -8 произведение элементов: -78382080 *** массив-результат *** 1 9 16 1 25 81 1 81 4 16 9 9 1 16 64

NikaNeo

Информатика

4,5(48 оценок)

2048*1024 = 2097152 кол-ко пикселей в изображении чтобы закодировать 16 различных цветов, необходимо: 16 = 2^i i =4 бита 2097152 * 4 = 8388608 бит = 1048576 байт (8 бит = 1 байт) = 1024 кбайт (1024 байта = 1 кбайт) = 1 мбайт (1024 байта = 1 мбайт) ответ: 1 мбайт.