Решить задачу на языке программирования Паскаль по теме "Записи":
1) Создать список песен (запись), содержащий название, стиль и длительность песен. Типы данных должны быть следующие:
1. Название - строка
2. Стиль - строка
3. Длительность песен - вещественное число
При помощи оператора присоединения внести данные в запись с клавиатуры.
1) Создать список песен (запись), содержащий название, стиль и длительность песен. Типы данных должны быть следующие:
1. Название - строка
2. Стиль - строка
3. Длительность песен - вещественное число
При помощи оператора присоединения внести данные в запись с клавиатуры.
More Questions From This User See All
Answers & Comments
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.