Дана возрастающая последовательность действительных чисел а1<=а2<=. . . <=а10. Вставить в неё действительное число b, а1

4 марта, 20234 марта, 2023 disel

DIM a(11)
FOR i = 1 TO 10
    PRINT "vvedite element a("; i; ")=";
    INPUT "", a(i)
NEXT
PRINT "massiv"
FOR i = 1 TO 10
    PRINT a(i);
NEXT
PRINT
FOR i = 11 TO 10 STEP -1
    a(i) = a(i - 1)
NEXT
PRINT "novyj massiv"
FOR i = 1 TO 11
    PRINT a(i);
NEXT