Pascal/Turbo Pascal - como hacer dibujar un cuadrado

hola a todos los programadores: Estoy necesitando ayuda en turbo pascal, recien comienzo a programar y me pidieron que realice un programa que segun lo que elija el usuario dibuje un cuadrado o un rectangulo, pidiendo al usuario que ingrese las coordenadas.
Por favor en cuanto antes me puedan ayudar mejor. Gracias
P/D: responderme a mi correo

hola, mira no estan dificil, haz un procedimiento con paso de variables,(4) de tipo integer, de las cuales usar en un procedimiento llamado rectangle, segun las coordenadas dibujara un cuadrado o rectangulo, eso es sin relleno, solo puedes cambiarle el color ala linea con setcolor(#, ò el nombre del color).
para hacer uno relleno utiliza el procedimiento bar,es casi igual por q es relleno, puedes cambiar su relleno con setfillstyle() buscalo en la ayuda de pascal.
las 4 coordenadas dadas son esquina superior izquierda y esquina inferior derecha.