Adloun

Milieu de deux points

Exercice · OCaml (option informatique), chapitre 7 — Enregistrements et types mutuellement récursifs

Énoncé

Écrire milieu p1 p2 renvoyant le point milieu (un nouvel enregistrement).

Corrigé

let milieu p1 p2 =
  { x = (p1.x +. p2.x) /. 2.0;
    y = (p1.y +. p2.y) /. 2.0 }

On construit un nouveau point dont chaque champ est la moyenne. Les enregistrements d'entrée ne sont pas modifiés — ils sont immuables.

Les autres exercices de ce chapitre Le cours du chapitre

Un blocage sur cet exercice ? Le tuteur d'Adloun guide par questions, sans donner la réponse.