информатика Нужно сделать подробную инструкцию, как это сделать или прислать готовое документом
169
370
Ответы на вопрос:
Uses crt; var a,b,c: integer; begin read(a); read(b); read(c); if ((a+b)> c) and ((a+c)> b) and ((b+c)> a) then begin if ((a=b) and (b< > c)) or ((a=c) and (c< > b)) or ((b=c) and (c< > a)) then writeln('triangle is isosceles'); if (a=b) and (b=c) and (a=c) then writeln('triangle is equilateral'); if (a< > b) and (a< > c) and (b< > c) then writeln ('triangle is scalene'); end else writeln('triangle is invalid'); end.
Популярно: Информатика
-
Pump200015.10.2020 21:59
-
marceries06.07.2021 23:14
-
muamy11.04.2020 06:22
-
anasteishamrrr23.06.2021 05:51
-
valera551523.08.2021 12:58
-
mariialebedeva28.07.2020 16:36
-
kpucmuna200504.05.2022 12:10
-
leonru120.10.2021 14:36
-
sofiko36505.07.2021 06:23
-
софия72515.12.2021 10:13