OneCompiler

i need code in tcl for this

1638

need tcl code for the above
Take a character as an input and print whether it is an vowel or a consonant. Sample input and output are shown as below: in tcl