Thuật toán:
B1. Nhập ba số dương a,b,c
B2. Nếu a+b>c và b+c>a và c+a>b thì in ra màn hình a,b,c là ba cạnh của tam giác. Ngược lại in ra a,b,c không là ba cạnh của tam giác.
B3. Kết thúc.
Chương trình:
var a,b,c: real;
begin
writeln('Nhap ba canh lan luot: '); read(a,b,c);
if (a<0) or (b<0) or (c<0) then
repeat
writeln('Khong hop le. Nhap lai ba canh lan luot: '); read(a,b,c);
until (a>0) and (b>0) and (c>0);
if (a+b>c) and (b+c>a) and (c+a>b) then writeln('Ba so nay la do dai ba canh tam giac') else writeln('Ba so nay khong la ba canh cua tam giac');
end.