Count how many vowels and consonants occur in a string: Difference between revisions

Content added Content deleted
No edit summary
Line 615: Line 615:




procedure DoVowelConsonatTest(Memo: TMemo);
procedure DoVowelConsonantTest(Memo: TMemo);
{Test two strings for vowels/consonants}
{Test two strings for vowels/consonants}
begin
begin
Line 640: Line 640:


</pre>
</pre>



=={{header|F_Sharp|F#}}==
=={{header|F_Sharp|F#}}==