Проходим Паскаль . Помогите, пожалуйста. Проверить, является ли треугольник рав?
Проходим Паскаль .
Помогите, пожалуйста.
Проверить, является ли треугольник рав??осторонним.
Я делать начала, а программа все ошибку выдает, не знаю как и быть.
Гость
Ответ(ы) на вопрос:
Гость Var a,b,c: real;
begin
writeln('Введите длины сторон треугольника (3 значения)');
readln(a,b,c);
if (a=b) and (b=c) then writeln(' Треугольник равносторонний')
else writeln(' Треугольник не равносторонний');
end.
Не нашли ответ?
Похожие вопросы