d1 = InputBox$ ( &quot; Bitte geben Sie die Länge der Gegenkathete ein: &quot; , &quot; Gegenkathete &quot; )
d1 = InputBox$ ( &quot; Saisissez la longueur du côté opposé : &quot; , &quot; Opposé &quot; )