В каждой из двух матриц все отрицательные элементы заменить нулями - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

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

Решение задачи: «В каждой из двух матриц все отрицательные элементы заменить нулями»

textual
Листинг программы
for i:=1 to x do
 for j:=1 to y do 
   if a[i,j]<0 then 
     a[i,j]:=0;

Объяснение кода листинга программы

В данном коде происходит замена всех отрицательных элементов в матрице a на нули. Для выполнения этой операции используется два вложенных цикла: внешний цикл проходит по строкам матрицы (от 1 до x), а внутренний цикл проходит по столбцам матрицы (от 1 до y). Внутри внутреннего цикла проверяется условие: если элемент матрицы a[i,j] меньше нуля, то он заменяется на ноль. Таким образом, после выполнения данного кода все отрицательные элементы в матрице a будут заменены на нули.

Оцени полезность:

14   голосов , оценка 4.071 из 5
Похожие ответы