J'ai un programme à faire pour mon cours de programmation sur les relations métriques dans un triangle quelconque. J'ai déjà commencé par le fait de pouvoir construire le triangle d'où l'inégalité triangulaire
je vous envoie le code de ce que j'ai déjà fait.
Merci de bien vouloir y jeter un oeil
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26 begin clrscr; while (max>=l[1]+l[2]+l[3] - max) do begin writeln('Entrez a'); readln (a); writeln ('Entrez b'); readln (b); writeln ('Entrez c'); readln (c); max:=a; end; for i:= 2 to 3 do begin if l[i] > max then max := l [i]; end; end.
Partager