Question

Даны стороны треугольника а,в,с, . Определите , является ли треугольник равнобедренным ?
Сотавьте блок -схему .
program treygolnik :
var
begin
write
read
if (a=b) or (b=c) or (a=c) then write (...................) else write (.......................) ;
помогите прошу очень сильно надо буду очень благодарна

Answer 1

Если я тебя правильно понял, то вот:
Program Znanija;
var a,b,c:integer;
begin
Writeln('Введите длину AB');
Readln(c);
Writeln('Введите длину BC');
Readln(b);
Writeln('Введите длину AC');
Readln(a);If c=b then writeln('Треугольник ABC - равнобедренный')else writeln('Треугольник ABC - не равнобедренный')
end.

e9282ba1f923a7d5b1ffdcfd17715b04.pas