Составить программу, которая запрашивает название романа и фамилию автора, а затем выводит сообщение «Писатель …… — автор романа…..» — Pascal(Паскаль)

var a,s:String;
begin
Writeln('название романа');
readln(a);
Writeln('фамилию автора please');
readln(s);
Writeln;
Writeln('название романа - ',a,' ','фамилия автора - ',s);
end.