Информатика, опубликовано 2018-08-22 23:58:07 by Гость
Заданы стороны треугольника a, b, c. Определить является ли он равносторонним. Написать программу на языке паскаль.
Ответ оставил Гость
Var a,b,c:integer;
begin
writeln(Введите три числа:);
readln(a,b,c);
if (a=b)and(b=c)
then writeln(Треугольник равносторонний)
else writeln(Треугольник не равносторонний (а может и не треугольник));
end.
Пример:
Введите три числа:
5 5 5
Треугольник равносторонний
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на