как нарисовать букву "К"в паскаль абц

спасибо чел выручил <3

обращайся :)

Uses Graph ABC;beginSetPenColor (clRed);line (100,50,100,150);line (100,100,150,50);line (100,100,150,150);end.