В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
MoDeRFeeD3
MoDeRFeeD3
23.09.2020 15:42 •  Информатика

Даны три произвольных числа a,b,c, значение которых длины сторон треугольника. выведите 0,если нельзя построить треугольник с такими длинами сторон; 3,если получается равностороний треугольник; 2 равнобедренный; 1
в остальных случаях. в !

Показать ответ
Ответ:
kirra00787p07znc
kirra00787p07znc
24.05.2020 08:49

program t3;

var a,b,c:real;     {допустимо поменять на integer}

begin

writeln ('Vvedit a,b,c');

readln (a,b,c); 

if (a<=b+c) and (b<=a+c) and (c<=a+b) then writeln ('0'); else

if (a=c) and (c=b) then writeln (3);  else

if (a=c) or (a=b) or (b=c) then writeln ('2'); else

writeln ('1');

readln

end. 

 

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота