составьте программу выводящую на экран значения любого элемента массива В [10] вещественных чисел, по введеному с клавиатуры индексу.

ОТДЕЛ Задание+;ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Матем ИЗ "...\Отделы\Числа\", Приём;ПЕР  B: РЯД 10 ИЗ ВЕЩ;  индекс: ЦЕЛ;УКАЗ  ОТ индекс := 0 ДО РАЗМЕР(B) - 1 ВЫП    B[индекс] := УЗК(Матем.случ())  КОН;  Вывод.Цепь("Введите индекс: ");  индекс := Приём.Число();  ЕСЛИ индекс >= РАЗМЕР(B) ИЛИ индекс < 0 ТО    Вывод.Цепь("^ПНХ")  ИНАЧЕ    Вывод.ЧВещ("^%g", B[индекс], 0, 0, 0)  КОНКОН Задание.