Дана программа на языке программирования паскаль. запиши данную программу и запусти. uses crt; var mas, a: array[1..10] of real; begin clrscr; mas[1]: =15; mas[5]: =31; mas[9]: =85; a[1]: =(mas[9]-mas[1])*mas[5]; write(a[1]: 5: 0); readkey; end.