Register

OR

Do you already have an account? Login

Login

OR

Don't you have an account yet? Register

Newsletter

Submit to our newsletter to receive exclusive stories delivered to you inbox!

Пармезан Черница

Заданы длины 3 сторон треугольника a, b, c. Определить, является ли треугольник прямоугольным, и вывести соответствующие сообщения. Составьте блок схему плз

более месяца назад
Просмотров : 94    Ответов : 1   

Лучший ответ:

Program asd;
Var
  a,b,c:integer;
Begin
  Writeln('Введите стороны треугольника: ');
  Write('a=');
  Readln(a);
  Write('b=');
  Readln(b);
  Write('c=');
  Readln(c);
  if (c>a) and (c>b) and (c=sqrt(sqr(a) sqr(b))) then Writeln('Прямоугольный') else
   if (a>c) and (a>b) and (a=sqrt(sqr(c) sqr(b))) then Writeln('Прямоугольный') else
    if (b>a) and (b>c) and (b=sqrt(sqr(a) sqr(c))) then Writeln('Прямоугольный') else      Writeln('Не прямоугольный');
End.
Блок-схема прикреплена ниже.
Тестовые значения:
Введите стороны треугольника:
 a=3
b=4
c=5
Прямоугольный

более месяца назад
Ваш ответ:
Комментарий должен быть минимум 20 символов
Чтобы получить баллы за ответ войди на сайт
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров и нажмите кнопку Просмотр анимации.


Другие вопросы:





Суррикат Мими
Для кодирования некоторой последовательности, состоящей из букв А, Б, В, Г, Д решили использовать неравномерный двоичный код, удовлетворяющий условию Фано. Для буквы А использовали кодовое слово 01, для буквы Б – кодовое слово 10. Какова наименьшая возможная суммарная длина всех пяти кодовых слов?
более месяца назад
Смотреть ответ   Просмотров : 115    Ответов : 1