Adloun

OCaml (option informatique) · Chapitre 19 · Application directe du cours

API de base

Files de priorité : le tas binaire · niveau 1 (application)

Énoncé

Écrire cree, est_vide et minimum.

Corrigé

let cree capacite = { taille = 0; donnees = Array.make capacite 0 }
let est_vide t = t.taille = 0
let minimum t = if est_vide t then failwith "tas vide" else t.donnees.(0)

minimum se lit en donnees.(0) (la racine) en temps constant : c'est l'invariant du tas. La capacité fixe le nombre maximal d'éléments (tableau de taille fixe).

Exercices semblables

Le cours du chapitre · Tous les exercices du chapitre