Помогите первое!! умоляю............
Program exmpl; var A,B,C: Char; begin write('Введите длины трёх сторон треугольника '); read(A,B,C); write('Треугольник со сторонами ',a,' ',b,' ',c); if (a+b>c) and (b+c>a) then write(' существует') else write(' не существует'); end.