Сам минимальный элемент оставить без изменений. Принять, что минимальный елемент в матрице один
DIM w(3, 4)
FOR i = 1 TO 3
FOR j = 1 TO 4
INPUT "vvedite element ", w(i, j)
NEXT
NEXT
PRINT "ishodnyj massiv"
FOR i = 1 TO 3
FOR j = 1 TO 4
PRINT w(i, j);
NEXT
PRINT
NEXT
xmin = 1
ymin = 1
FOR i = 1 TO 3
FOR j = 1 TO 4
IF w(i, j) < w(xmin, ymin) THEN xmin = i: ymin = j
NEXT
NEXT
PRINT "nomer stroki="; xmin
FOR i = 1 TO 3
FOR j = 1 TO 4
IF (i <> xmin) OR (j <> ymin) THEN w(i, j) = w(i, j) + xmin
NEXT
NEXT
PRINT "novyj massiv"
FOR i = 1 TO 3
FOR j = 1 TO 4
PRINT w(i, j);
NEXT
PRINT
NEXT
Похожие записи/страницы:
- Значение элементов матрицы W (3,4) увеличить на величину индекса строки с минимальным элементом. Сам минимальный…
- В матрице А(N,М) найти максимальный МХ и минимальный MN элементы, а также произведение P всех элементов,…
- Дана действительная матрица 5х4, все элементы которой различны. В каждой строке выбирается элемент с наименьшим…
- В матрице А(N,М) найти максимальный МХ и минимальный MN элементы, а также произведение P всех элементов,…
- Дана действительная матрица 5х4, все элементы которой различны. В каждой строке выбирается элемент с наименьшим…
- Определить минимальный элемент массива и его порядковый номер, найденный минимальный элемент поменять местами с…