Как в програме Paskal ABC записать стихотворение из 8 строчек…?

Program PR_1; beginwriteln ('y'); //выводит текст на экранwriteln (' y '); writeln (' y '); writeln (' y '); writeln (' y '); writeln (' y '); writeln (' y '); writeln (' y '); end.