Решить задачу на языке программирования Паскаль по теме "Записи":

1) Создать список песен (запись), содержащий название, стиль и длительность песен. Типы данных должны быть следующие:

1. Название - строка

2. Стиль - строка

3. Длительность песен - вещественное число

При помощи оператора присоединения внести данные в запись с клавиатуры.

Текст приведенной ниже программы организует ввод данных и запись их в типизированный файл. Для завершения ввода в качестве названия надо ввести символ "звездочка" ( * ).type  song=record  name,style:string[20];  duration:real  end;var  f:file of song;  r:song;begin  Assign(f,'MySongs.dat');  Rewrite(f);  Writeln('Вводите данные в порядке "наименование, стиль, длительность');  Writeln('Для окончания ввода укажите символ * вместо наименования');  repeat    Readln(r.name);    if r.name<>'*' then begin      Readln(r.style);      Readln(r.duration);      Write(f,r)    end  until r.name='*';  Close(f)end.