Август
6 год назад
Составить программу на Pascal ABC.
Задача:
Даны 3 стороны Треугольника a,b,c . Является ли треугольник равностороним? Является ли треугольник равнобедреным.
Программу написать можно ли одну большую либо 2 маленькие(маленькие отвечающий на каждый вопрос задачи)
ОТВЕТЫ
Тарасий
Aug 7, 2019
Var a, b, c : integer;
begin
readln(a, b, c);
if (a = b) and (a=c) then writeln(Треугольник равносторонний);
if ((a=b) and (alt;gt;c)) or (b = c) and (blt;gt;a) then writeln(Треуголник равнобедренный)
end.
begin
readln(a, b, c);
if (a = b) and (a=c) then writeln(Треугольник равносторонний);
if ((a=b) and (alt;gt;c)) or (b = c) and (blt;gt;a) then writeln(Треуголник равнобедренный)
end.
5
Смежные вопросы:
