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

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

162 Capítulo 8. Procedimi<strong>en</strong>tos y funciones<br />

mi<strong>en</strong>tras que las funciones repres<strong>en</strong>tan un valor, por lo que ti<strong>en</strong><strong>en</strong> s<strong>en</strong>tido<br />

como expresiones:<br />

t:= TanGrados(a);<br />

WriteLn (’La medida buscada es: ’, radio * TanGrados(a) - 1);<br />

x:= 2 * TanGrados(a)/(y - 1)<br />

Por el contrario, no está permitido ni ti<strong>en</strong>e s<strong>en</strong>tido llamar a una función<br />

como un procedimi<strong>en</strong>to:<br />

WriteLn(...);<br />

TanGrados(a);<br />

a:= a + 1<br />

ni tampoco llamar a un procedimi<strong>en</strong>to como una función:<br />

x:= 4 * EscrDosDec(t)<br />

• Una vez definido un subprograma, queda incorporado al l<strong>en</strong>guaje para<br />

ese programa, si<strong>en</strong>do posible usarlo <strong>en</strong> el mismo tantas veces como sea<br />

necesario.<br />

8.2 Subprogramas con parámetros<br />

Los parámetros permit<strong>en</strong> que el programa y los procedimi<strong>en</strong>tos y funciones<br />

puedan comunicarse <strong>en</strong>tre sí intercambiando información. De esta forma las<br />

instrucciones y expresiones compon<strong>en</strong>tes de los subprogramas se aplican sobre<br />

los datos <strong>en</strong>viados <strong>en</strong> cada llamada ofreci<strong>en</strong>do una flexibilidad superior a los subprogramas<br />

sin parámetros. Al mismo tiempo, si la ejecución de los subprogramas<br />

produce resultados necesarios <strong>en</strong> el punto de la llamada, los parámetros pued<strong>en</strong><br />

actuar como el medio de transmisión de esos resultados.<br />

8.2.1 Descripción de un subprograma con parámetros<br />

Veamos <strong>en</strong> primer lugar un ejemplo s<strong>en</strong>cillo de un procedimi<strong>en</strong>to sin parámetros:<br />

procedure TrazarLinea;<br />

{Efecto: traza una línea de 10 guiones}<br />

var<br />

i: integer;

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

Saved successfully!

Ooh no, something went wrong!