Задание 10 Параграф 4.4 ГДЗ Босова 8 класс 2023 (Информатика)

Входные данные
а b с > > 1 2 1
а b с > > 2 2 2
а b с > > 20 20 30
а b с > > 3 4 5
Выходные данные
Не существует
Равносторонний
Равнобедренный
Разносторонний
var
a, b, c: integer;
begin
write(‘a b c > > ‘);
readln(a,b,c);
if (a + b > c) and (a + c > b) and (b + c > a) then
if (a = b) and (b = c) then writeln(‘Равносторонний’)
else if (a = b) or (b = c) or (a = c) then writeln(‘Равнобедренный’)
else writeln(‘Разносторонний’)
else writeln(‘Не существует’);
end.
Окно вывода
a b c > > 1 2 1
Не существует
a b c > > 2 2 2
Равносторонний
a b c > > 20 20 30
Равнобедренный
a b c > > 3 4 5
Разносторонний

Для существования треугольника должны выполняться неравенства:

$$a+b>c,\quad a+c>b,\quad b+c>a$$

Если треугольник существует, то:

• при $$a=b=c$$ он равносторонний;
• при равенстве только двух сторон — равнобедренный;
• если все стороны различны — разносторонний.

var
a, b, c: integer;
begin
  write(‘a b c>>’);
  readln(a, b, c);
  if (a + b > c) and (a + c > b) and (b + c > a) then
    if (a = b) and (b = c) then writeln(‘Равносторонний’)
    else if (a = b) or (b = c) or (a = c) then writeln(‘Равнобедренный’)
    else writeln(‘Разносторонний’)
  else writeln(‘Не существует’);
end.

Проверка на тестовых данных:

Ответ

Программа определяет существование треугольника и его тип: равносторонний, равнобедренный или разносторонний.