4 :
1. ;
2. ;
3. ;
4. ;
5. .
, . , , -5 15. , Random (b - a +1)+ a, Random(21)-5. , [-5, 15] . i n, .
:
. minst, - imin.
(.. j), . min:= a [1, j ], : i:= 2, n, 1. , , . . -:
, , minst < min . , min:= minst imin:= j, . , .
- :
() . , , , , . , ( ) (). - . , , , .
. .
-
|
|
|
PASCAL
Program, . Primer.
Uses CRT, .
(const) (var).
n =4 ( ) m = 5 ( ).
a, i, j , min , imin , minst , k .
begin end. , .
, . clrscr, Crt.
random randomize , .