Le programme est en Pascal.