Какую задачу решает данная программа?
Что вводится в данной программе?program n_7
var a,b,c:integer,ans:boolean,
begin
writeln ('Опредиление истинoсти высказывания о равнобедренном треугольнике');
write ('Введите значение a,b,c>>');
readln (a,b,c);
ans =(a+b) or (a=c) or (b+c);
writeln ('Треугольник с длинами сторона,
b, c'является равнобедренным - 'ans);
end.