program abc;

var a,b,d: string;

begin

readln(a);

readln(b);

readln(d);

write ('Билет на "',a,'" ','в ','"',b,'" ','на ',d,' забронирован');

end.

Ответ:

Python:

film = input('Название фильма: ')

kino = input('Название кинотеатра: ')

time = input('Время: ')

print(f'Билет на "{film}" в "{kino}" на {time} забронирован.')

Pascal:

var

 film,kino,time: string;

begin

 write('Название фильма: ');

 readln(film);

 write('Название кинотеатра: ');

 readln(kino);

 write('Время: ');

 readln(time);

 writeln('Билет на "', film, '" в "', kino, '" на ', time, ' забронирован.');

end.