Gunta, вы можете перевести на Паскаль шедевры:
t*5&(t>>7)|t*3&(t*4>>10)
(t*5&t>>7)|(t*3&t>>10)
t*9&t>>4|t*5&t>>7|t*3&t/1024
((t<<1)^((t<<1)+(t>>7)&t>>12))|t>>(4-(1^7&(t>>19)))|t>>7
на C:
main(t){for(;;t++)putchar(((t<<1)^((t<<1)+(t>>7)&t>>12))|t>>(4-(1 ^7&(т>>19)))|т>>7);}