Информатика, 10 класс

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