Area de un triangulo

PROBLEMA
Escriba un algoritmo que lea la base y la altura de un triangulo mientras que el area resultante sea mayor a 1.

ALGORITMO
Entradas:  Numerico base
                 Numerico altura
Salidas:    Numerico area

INICIO
   Hacer
        Leer base
        Leer altura
        Multiplicar base por altura y guardar en area
        Dividir area entre 2 y guardar en area
        Imprimir area
    Mientras area sea mayor a 1
FIN

PSEUDOCODIGO
Class  Triangulo
           // Declaraciones
           Real: base
           Real: altura
           Real: area
           // Procedimiento
           Main
              Do
                 Print "Introduce la base"
                 Scan base
                 Print "Introduce la altura"
                 Scan altura
                 area = base * altura
                 area = area / 2
                 Print area
             While (area>1