Основное условие что бы 3 числа могла быть сторонами треугольника это сумма каждых 2х чисел должна быть больше третьего.
Program Tri;
var a,b,c:real;
begin
readln(a);
readln(b);
readln(c);
if (a+b>c) and (a+c>b) and (b+c>a) then writeln ('могут быть треугольником');
end.
про то как определить какой это треугольник не знаю