Материалы сайта
Это интересно
Лабораторные работы по информатике
ИДЗ №1 Задана матрица В. найти минимальный элемент матрицы. Все элементы лежащие ниже главной диагонали, умножить на этот минимальный элемент. INPUT "N,M"; N, M DIM A(N, M) PRINT "Ввод матрицы" FOR I = 1 TO N FOR J = 1 TO M PRINT "A("; I; ")="; INPUT A(I, J) NEXT J NEXT I MIN = A(1, 1) FOR I = 1 TO N FOR J = 1 TO M IF MIN > A(I, J) THEN MIN = A(I, J) END IF NEXT J NEXT I FOR I = 2 TO N FOR J = 1 TO I - 1 A(I, J) = A(I, J) * MIN NEXT J NEXT I FOR I = 1 TO N FOR J = 1 TO M PRINT A(I, J); NEXT J PRINT NEXT I END