Completar frases Área de un rectángulo PascalVersión en línea Este programa calcula el área de un rectángulo, utilizando como variables la base y la altura. por Isaías A. Cuá Dubón 1 writeln Var area program writeln end base altura readln readln readln begin area writeln { Este programa realiza el cálculo del área de un rectángulo } AreaRectangulo ; { Aquí declaro mis variables } : integer ; : integer ; : integer ; { Aquí comienza el programa } ( 'Este programa realiza el cálculo del área de un rectángulo' ) ; ( 'Programado por : Prof . Isaías A . Cuá Dubón' ) ; ( 'Ingrese la altura del rectángulo : ' ) ; ( altura ) ; Writeln ( 'Ingrese la base del rectángulo : ' ) ; ( base ) ; { Hago el cálculo del área } : = base * altura ; { Presento en pantalla un mensaje con el resultado } writeln ( 'El área del rectángulo es de : ' ) ; writeln ( area ) ; ; .
Crear