Даны три положительных числа. если они могут быть длинами сторон треугольника, то определить его вид по сторонам, и по углам, иначе выдать соответствующее сообщение. решите разветляющим алгоритмом
256
475
Ответы на вопрос:
Var a,b,c: integer; x,y,z: string; begin writeln('введите стороны треугольника'); readln(a,b,c); x: ='равнобедренный'; y: ='равносторонний'; z: ='разносторонний'; begin if (c=b) and (a< > c) then writeln('треугольник',' ',x); if (a=c) and (a< > b) then writeln('треугольник',' ',x); if (a=b) and (a< > c) then writeln('треугольник',' ',x); if (a=b) and (a=c) and (b=c) then writeln('треугольник',' ',y); if (a< > b) and (a< > c) and (b< > c) then writeln('треугольник',' ',z); end; readln end.
Популярно: Информатика
-
averianova198603.11.2022 18:18
-
manokhaangel14.04.2020 00:02
-
Maksim313101.03.2020 19:47
-
luchik160830.04.2022 13:47
-
Yoidzokumi06.05.2023 00:04
-
mrfotuna1431.03.2020 14:53
-
маша275005.11.2020 00:26
-
ALEXSEENKOALEX29.04.2021 08:27
-
NastyaMishacheva26.06.2021 08:36
-
XxXRePlayXxX03.09.2022 20:58