Question

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

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

Answer 1

В чём проблема? Программа работает

Answer 2

ответ просто напишите

Answer 3

Эм, вопроса то и не было "Запиши данную программу и запусти." я записал и запустил, все работает