Реферат: Лабораторные работы по информатике

IF Y(I) < MINY THEN

MINY = Y(I)

END IF

NEXT I

END IF

IF J = 0 THEN

PRINT "Нет массива Z"

ELSE

FOR I = 1 TO K

PRINT Y(I)

NEXT I

PRINT "MINY="; MINY

END IF

FOR I = 1 TO J

IF Z(I) MOD 2 <> 0 THEN

NPN = I

END IF

NEXT I

FOR I = 1 TO J

Y(N)	MINY	Z(K)	Z(NPN)
8,6,7,9	6	4,1,10	1

PRINT Z(I)

NEXT I

PRINT "Z(NPN)="; Z(NPN)

END

ИДЗ №1

Задана матрица В. найти минимальный элемент матрицы. Все элементы лежащие ниже главной диагонали, умножить на этот минимальный элемент.