09.05.2013 Views

Algoritmos y Programación en Pascal

Algoritmos y Programación en Pascal

Algoritmos y Programación en Pascal

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

342 Capítulo 16. Punteros<br />

apNum1^:= 6;<br />

apNum2^:= 6;<br />

la comparación:<br />

apNum1 = apNum2<br />

apCar<br />

’A’<br />

apNum1<br />

3<br />

Figura 16.4.<br />

apNum2<br />

seguiría si<strong>en</strong>do False, ya que las direcciones apuntadas no coincid<strong>en</strong>, a pesar de<br />

ser iguales los datos cont<strong>en</strong>idos <strong>en</strong> dichas direcciones.<br />

También es posible la asignación<br />

apNum1:= apNum2<br />

cuyo resultado puede verse <strong>en</strong> la figura 16.4 <strong>en</strong> la que se observa que ambos<br />

punteros señalan a la misma dirección, resultando ahora iguales al compararlos:<br />

apNum1 = apNum2<br />

produce un resultado True y, como consecu<strong>en</strong>cia, apNum1^ y apNum2^ ti<strong>en</strong><strong>en</strong> el<br />

mismo valor, 6. Además, esta coincid<strong>en</strong>cia <strong>en</strong> la memoria hace que los cambios<br />

efectuados sobre apNum1^ o sobre apNum2^ sean indistintos:<br />

ApNum1^:= 666;<br />

WriteLn(ApNum2^); {666}<br />

6

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!