Pascal Ejercicio Paso a Paso

{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}

Publicar un comentario

1 Comentarios

  1. Hola amigos ayúdenme con este ejercicio
    _Cree un vector que lea 10 números reales determine el número mayor leído y muestre su posición

    ResponderEliminar
Emoji
(y)
:)
:(
hihi
:-)
:D
=D
:-d
;(
;-(
@-)
:P
:o
:>)
(o)
:p
(p)
:-s
(m)
8-)
:-t
:-b
b-(
:-#
=p~
x-)
(k)