Решить задачу на языке программирования Паскаль по теме "Записи": 1) Создать список песен (запись), содержащий название, стиль и длительность песен. Типы данных должны быть следующие: 1. Название - строка 2. Стиль - строка 3. Длительность песен - вещественное число При помощи оператора присоединения внести данные в запись с клавиатуры.

Type
 mus = record
  Name:string;
  style:string;
  dur:real;
 end;
var
 A:array[1..10000] of mus;
 i,n:integer;
 Nam, st:string;
 duration:real;
begin
 Writeln(Введите количество композиций: );
 Readln(n);
 for i:=1 to n do
  begin
    Write(Название: );
    read(Nam);
    Write( Стиль: );
    read(ST);
    Write( Длительность: );
    read(duration);
    A[i].Name:=Nam;
    A[i].style:=st;
    A[i].dur:=duration;
  end;
end.