d1 = InputBox$ ( &quot; Bitte geben Sie die Länge der Gegenkathete ein: &quot; , &quot; Gegenkathete &quot; )
d1 = InputBox$ ( &quot; Escriba la longitud del lado opuesto: &quot; , &quot; Lado opuesto &quot; )