Составить программу на паскале?

Alex639239 19 июн. 2021 г., 22:17:05

Begin var n : = ReadInteger('n = ') ; var m : = ReadInteger('m = ') ; Writeln('Исходная матрица : ') ; var a : = MatrRandom(n, m, - 20, 20) ; a.

Println(4) ; for var i : = 0 to a.

RowCount - 1 do for var j : = 0 to a.

ColCount - 1 do if a[i, j]>0 then a[i, j] : = 1 else a[i, j] : = 0 ; Writeln('Измененная матрица : ') ; a.

Println(4)

end.

Пример :

n = 4

m = 5

Исходная матрица : 7 - 8 - 7 - 5 - 7 2 4 - 3 - 2 - 13 14 5 - 12 9 20 12 11 18 - 3 7

Измененная матрица : 1 0 0 0 0 1 1 0 0 0 1 1 0 1 1 1 1 1 0 1.

Fait2016 21 янв. 2021 г., 20:55:06 | 5 - 9 классы

Из элементов массива A, состоящего из 10 элементов, заполненный случайным образом, сформировать массив B по следующему правилу : положительные элементы перенести в массив b без изменений, а отрицатель?

Из элементов массива A, состоящего из 10 элементов, заполненный случайным образом, сформировать массив B по следующему правилу : положительные элементы перенести в массив b без изменений, а отрицательные заменить их модулем.

Распечатать оба массива.

Subaru04 14 мая 2021 г., 10:31:45 | 10 - 11 классы

Найти средние арифметические положительных и отрицательных элементов массива Паскаль написать программу?

Найти средние арифметические положительных и отрицательных элементов массива Паскаль написать программу.

1120031 2 февр. 2021 г., 23:50:02 | 10 - 11 классы

Введите с клавиатуры одномерный массив А (К), элементами которого являются положительные и отрицательные числа?

Введите с клавиатуры одномерный массив А (К), элементами которого являются положительные и отрицательные числа.

Подсчитайте сумму положительных элементов массива и произведение отрицательных.

Затем сформируйте новый массив В (К) из массива А (К), в котором все положительные элементы замените на произведение отрицательных, а отрицательные на сумму положительных.

Gapeev2004 1 мая 2021 г., 09:35:26 | 5 - 9 классы

В массиве, состоящем из положительных и отрицательных чисел, определить, сколько элементов положительных и сколько элементов отрицательных?

В массиве, состоящем из положительных и отрицательных чисел, определить, сколько элементов положительных и сколько элементов отрицательных.

Sasha1326 10 апр. 2021 г., 18:46:02 | 10 - 11 классы

Найти средние арифметические положительных и отрицательных элементов массива, написать программу в паскале?

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

Lilalilova199 12 июн. 2021 г., 02:12:24 | 10 - 11 классы

Задан двумерный массив, состоящий из 10 строк и 10 столбцов?

Задан двумерный массив, состоящий из 10 строк и 10 столбцов.

Сконструируйте программу, которая бы подсчитывала положительные и отрицательные элементы и записывала их в два разных массива.

Ternovand 28 сент. 2021 г., 12:00:55 | 5 - 9 классы

Дан одномерный массив чисел?

Дан одномерный массив чисел.

Подсчитать в нем количество элементов равных нулю, отрицательных элементов и положительных элементов.

Den4ik199812 8 мар. 2021 г., 12:04:21 | 10 - 11 классы

Пожалуйста, на программе Паскаль срочно надоВвести двумерный массив A N×M , вывести его?

Пожалуйста, на программе Паскаль срочно надо

Ввести двумерный массив A N×M , вывести его.

Найти сумму

положительных элементов массива, исключая при этом те элементы, которые

кратны трём.

Полученной суммой заменить отрицательные элементы

последнего столбца.

Kristinapopovsk 3 июн. 2021 г., 13:19:25 | 10 - 11 классы

Дан массив из 20 элементов случайных чисел из диапазона [ - 1 ; 1] ?

Дан массив из 20 элементов случайных чисел из диапазона [ - 1 ; 1] .

Каких элементов больше, положительных , отрицательных или равных нулю.

Паскаль.

Ktarbeeva 24 нояб. 2021 г., 02:30:21 | 5 - 9 классы

Положительные элементы заменить на 1, а отрицательные на - 1?

Положительные элементы заменить на 1, а отрицательные на - 1.