Cel mai mare divizor comun

 

Pe o forma se pun trei etichete doua cutii de editare si un grup de butoane radio. La proprietatea Items a grupului de butoane se adauga sirurile de caractere ca in imaginea de mai jos:

 

Se stabilesc textele afisate de componente ca in figurile alaturate.
La dublu clic pe componenta grup de butoane radio se introduce codul de mai jos:

Pentru a preîntâmpina erorile ce ar putea sa apara (impartire la zero) se poate face urmatorul artificiu: se selecteaza forma (se da clic pe ea), folosind inspectorul de obiecte se da clic pe pagina Events si se da dublu clic pe evenimentul OnActivate (vezi figura de mai jos)