Дана программа ** языке программирования Паскаль. Запиши данную программу и запусти. uses...

Дана программа на языке программирования Паскаль. Запиши данную программу и запусти.

uses crt;
var
mas, A: array[1..10] of real;
begin
clrscr;
mas[1]:=11;
mas[5]:=33;
mas[9]:=92;
A[1]:=(mas[9]-mas[1])*mas[5];
write(A[1]:5:0);
readkey;
end.

В чем же дело,  идем в Паскаль, набираем программу, запускаем, сотрим на результат. Программа выдает значение первого элемента массива A[1]:=(mas[9]-mas[1])*mas[5];

В чём дело? Идём в паскаль, набираем программу, запускаем и смотрим на результат. Программа должна выдавать значение первого элемента массива A[1]:=(mas[9]-mas[1])*mas[5]; К примеру у меня 2673