DenKaz_2

DIM A(1 TO 10) AS INTEGER, I AS INTEGER, NP AS INTEGER
PRINT "Input array:"
FOR I = 1 TO 10
    PRINT "A("; I; ") = ";
    INPUT "", A(I)
NEXT I
FOR I = 1 TO 10
    IF A(I) < 0 THEN EXIT FOR
NEXT I
I = I + 1
FOR I = I TO 10
    IF A(I) < 0 THEN EXIT FOR
NEXT I
PRINT A(I) * A(5)