Заполните таблицу моя библиотека включи мне ее не менее 5 книг

Название книги автор жанр дюймовочка андерсен х.к. сказки серебрянное копытце бажов п.п. сказки мишкина каша носов н. рассказы сказка о потеренном времени шварц е. сказка ну, погоди камов ф. курляндский а. хайт а. сказка по мультфильму

текст: happy new year, dear содержит 30 символов. при кодировании текста с acsii каждый символ кодиреутся 8 битами или 1 байтом, следовательно

30 символов = 30 байт или  30 * 8 = 240 бит

var a: integer; c1, c2, c3, c4: integer;

begin for a : = 1000 to 9999 do begin c1 : = a div 1000; c2 : = (a div 100) mod 10; c3 : = (a div 10) mod 10; c4 : = a mod 10; if (c1 < > c2) and (c1 < > c3) and (c1 < > c4) and (c2 < > c3) and (c2 < > c4) and (c3 < > c4) then writeln(a); end; end.