Qbasic дан массив. все его элементы умножить на последний элемент
DIM a(1 TO 10) CLS RANDOMIZE (TIMER) FOR i = 1 TO 10 a(i) = CINT(10 * RND + 11) PRINT a(i); NEXT i PRINT FOR i = 1 TO 10 a(i) = a(i)*a(10) PRINT a(i); NEXT i PRINT