题目：输入三条边，判断它是不是三角形，如果是，并判断它是什么三角形？？？？（用VB语言编程）

我知道怎么判断他是不是三角形，也知道怎么编，但我有的是free pascal，不知行不行：
program lam;
var
a,b,c:integer;(a，b，c分别为三角形的三条边)
begin
read(a,b,c);
if (a+b>c)and(a+c>b)and(b+c>a)and(a-b<c)and(a-c<b)and(b-c<a) then wirte('Can')
else write(Can't);(三角形公式：任意两边之和大于第三边，任意两边之差小于第三边)
end.