• Проходим Паскаль .
    Помогите, пожалуйста.
    Проверить, является ли треугольник равносторонним.
    Я делать начала, а программа все ошибку выдает, не знаю как и быть.

Ответы 5

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

      gizmo29
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years