Pascal - usare variabile real come parametro per disegnare un rettangolo

allora ho 2 valori real dati da una serie di calcoli e volevo usarli per disegnare 2 rettangoli in modo da far vedere la differenza di valore in maniera grafica, una sottospecie di grafico, solo che la procedura "rectangle" non accetta parametri real...come posso fare?? (anche qualcosa per convertire real in smallint perchè se non sbaglio la procedura accetta 4 parametri smallint)

Ciao!

Per convertire un numero real a integer, esiste la funzione trunc e round.

Trunc, tronca il numero dalla parte decimale, mentre round arrotonda il numero all' intero più vicino.