{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}
1 Comentarios
Hola amigos ayúdenme con este ejercicio
ResponderEliminar_Cree un vector que lea 10 números reales determine el número mayor leído y muestre su posición