Ai, i=1,,10 Bj, j=1,,15. Amin Bmin. , Amin Bmin .
. .
A .
.
Amin=A1, .
Bmin.
: i 2 10 1, j 2 15 1. Amin, - Bmin. . 11.
. 28. Amin, Bmin .
Ai, i=1,,10. Bj, j=1,,15 , . DIMENSION, .
( 25) DATA. .
. Amin Bmin IF.
2 .
Basic. A B Single ( ). Variant. DATA . .
DIM A(10) as Single, B(15) as Single
DATA -20.42,-11.80,-19.90, 44.86, 47.98,-9.86,-22.17,-33.96,-33.72,
14.66,-8.99,-8.72,21.27,-17.38,13.32,-29.24,-31.40,8.34,-41.93,
-4.20,40.57,-23.86, 28.52,-12.11,-21.03
FOR I = 1 TO 10
READ A(I)
NEXT I
FOR J = 1 TO 15
READ B(J)
NEXT J
Amin = A(1)
Bmin = B(1)
I. Amin
FOR I = 2 TO 10
A Amin
IF(A(I) < Amin)THEN
Amin = A(I)
ENDIF
NEXT I
J. Bmin
FOR J = 2 TO 15
B Bmin
IF(B(J) < Bmin)THEN
Bmin = B(J)
ENDIF
NEXT J
Amin Bmin
PRINT Amin=,Amin, Bmin=,Bmin
|Amin| |Bmin|
IF(ABS(Amin) > = ABS(Bmin))THEN
PRINT |Amin| |min|
ELSE
PRINT |Bmin| |Amin|
ENDIF
END
1
()
-