Задать вопрос
9 января, 19:24

Заменить все положительные элементы противоположными в прямоугольном массиве эл. которого являются целые числа.

+4
Ответы (1)
  1. 9 января, 22:42
    0
    Const nx=20; var i, j, n:integer; D:array[1 ... nx, 1 ... nx] of integer;

    begin

    write ('Введите размер матрицы n') ; Readln (n) ;

    for i:=1 to n do begin

    for j:=1 to n do begin

    D[i, j]: = random (100) - 50; write (D[i, j]:4) ; end; writeln; end; writeln; writeln;

    for i:=1 to n do begin

    for j:=1 to n do begin

    if D[i, j] >0 then D[i, j]: = D[i, j] * (-1) ; write (D[i, j]:4) ; end; writeln; end; end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Заменить все положительные элементы противоположными в прямоугольном массиве эл. которого являются целые числа. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Все задачи делаются в Паскале! 1) Увеличить все элементы массива A на 1. 2) Умножить все элементы массива A на 2. 3) Возвести в квадрат все элементы массива A.
Ответы (1)
Cрочно! Язык visual basic, массивы - задачи: 1) Заменить значение любого элемента массива на а 2) Определить имеются ли четные числа в массиве 3) Заменить все элементы некоторой строки на заданное число 4) Вывести все элементы N столбца и M строки
Ответы (1)
В одномерном массиве из 10 действительных чисел заменить все отрицательные элементы, противоположными им числами и вывести новый массив.
Ответы (1)
1) В числовом одномерном массиве все элементы массива, кратные 3, возвести в куб. В новом массиве найти сумму всех членов массива.
Ответы (1)
1. В одномерном массиве произвольных чисел А (10) положительные элементы уменьшить в двое, а отрицательные элементы заменить на значения их индексов
Ответы (1)