Составить программу, которая вводит с клавиатуры массив из 30 вещественных чисел элементов и выводит 10 последних элементов в обратном порядке, с тремя цифрами после запятой.

var i: integer;a: array [1..30] of real;beginfor i:=1 to 30 dobeginwriteln ('ââåäè ýëåìåíò ìàññèâà');read (a[i]);end;for i:=30 downto 20 dowriteln (a[i]:7:3);end.