Implement a procedure in Turbo Pascal language that sorts an array of integer. The array is passed to the procedure as parameter. Use the fastest variation of Bubble Sort algorithm. In your entire response, the letter c should appear less than 7.
user