{Programa en Pascal Explicación Paso a Paso}

PROGRAM CIRCUNFERENCIA; {Nombre del Programa}

USES WINCRT; {Librería Borland Pascal}

VAR radio:REAL; {Declaración de Variables}

VAR longitud,area:REAL; {Declaración de Variables}

BEGIN {Inicio del Cuerpo del Programa}

ClrScr; {Limpia la Pantalla}

WRITELN ('LONGITUD Y AREA DE UNA CIRCUNFERENCIA'); {Escribir Mensaje que mostrara la Pantalla}

WRITELN (' ');

WRITE ('Escriba el radio: ');

READLN (radio); {Nombre de la Variable que guardara la Información}

WRITELN (' ');

longitud:=2*3.1416*radio;

area:=3.1416*radio*radio;

WRITE ('LONGITUD DE LA CIRCUNFERENCIA: '); WRITELN

(longitud:5:2);

WRITE ('AREA DE LA CIRCUNFERENCIA: '); WRITE (area:5:2);

END. {Fin del Cuerpo del Programa}

{Atte. Prof. Rafael Perez}

{Logica de Programacion}