Cercles (1) P84786

Per resoldre aquest exercici us caldrà la definició de Punt i de distancia() del problema P46254.

Feu un procediment

que mou el punt p1 segons indiquen les coordenades del punt p2.

Per exemple, sigui p1 el punt (2, 1), i p2 el punt (−0.5, 4). Llavors desplaca(p1, p2) faria que p1 valgués (1.5, 5).

Addicionalment, usant la definició

feu dos procediments,

que escala el cercle c proporcionalment al real estrictament positiu esc, i

que mou el cercle c segons indiquen les coordenades de p.

Per exemple, sigui c un cercle de centre (1, 2) i radi 3. Llavors, escala(c, 2) obtindria un cercle de centre (1, 2) i radi 6. En canvi, si p és (3.5, −1), desplaca(c, p) obtindria un cercle de centre (4.5, 1) i radi 3.

Feu també una funció que indiqui si un punt p és interior a un cercle c:

Suposeu que els radis són sempre estrictament positius, i que p mai estarà exactament a la frontera de c.

Observació Només cal enviar el procediment demanat; el programa principal serà ignorat. Seguiu estrictament la definició dels tipus de l’enunciat.