Question

Дана программа на языке программирования Паскаль. Запиши данную программу и запусти.
program z1;
var
mas, A: array[1..10] of real;
begin
mas[1]:=14;
mas[5]:=32;
mas[9]:=84;
A[1]:=(mas[9]-mas[1])*mas[5];
write(A[1]:5:0);
read;
end.

Answer 1

Ответ: запустил, решение во вложении.