составьте алгоритм с помощью которого можно определить является ли треугольник с заданными длинами сторон а, в, с равносторонним
Answers & Comments
Igorrock
Program zadanie; Var Begin Writeln('Задайте длины сторон треугольника a,b,c'); Readln(a,b,c); If (a=b) and (b=c) Then Writeln('Треугольник является равносторонним') Else Writeln('Треугольник не равносторонний'); End.
Answers & Comments
Var
Begin
Writeln('Задайте длины сторон треугольника a,b,c');
Readln(a,b,c);
If (a=b) and (b=c) Then Writeln('Треугольник является равносторонним')
Else Writeln('Треугольник не равносторонний');
End.
and-логическое "и".