1 ' ξονες 4 10 CLS 20 DIM A(10) 30 FOR T=1 TO 10 40 A(T)=INT (RND(1)*100 ) 50 ? A(T) 60 NEXT 70 ? 80 T=0 90 I=0 100 FOR I=1 TO 10 110 MAX =A(I) 120 MIN =A(I) 130 FOR T=1 TO 10 140 IF MAXA(T) TH MIN=A(T) 160 NEXT T 170 NEXT I 180 ? "ξαιβομψϋεε ώισμο ";MAX 190 ? "ξαινεξψϋεε ώισμο ";MIN 200 ? "ςαϊξοστψ νεφδυ ξινι =";MAX-MIN