1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | INPUT"vvedite kol-vo chisel ",n DIM a(n) RANDOMIZE TIMER FOR i= 1 TO n a(i)=INT(RND* 20 )- 10 NEXT PRINT"massiv" FOR i= 1 TO n PRINT a(i); NEXT PRINT FOR i= 1 TO n IF a(i)^ 2 < 10 THEN k=k+ 1 NEXT PRINT"kol-vo chisel=";k |