СВ
Смирнова Вероника

задание, нужно записать на языке паскаль: Даны три отрезка, можно ли из них построить треугольник?

SM
Serega Molot

var
a, b, c: real;
begin
write ('стороны? ');
readln (a,b,c);
write('треугольник');
if (a >= b + c) or (b >= a + c) or (c >= a + b) then write(' не');
writeln (' существует');
end.

Т*
Тонька ***

Если сумма двух каждых больше третьего то можно

Виктория Назарова
Виктория Назарова

Смотри. В теории треугольник можно построить, если самая большая сторона меньше чем сумма двух других меньше. Кусочек кода
var a,b,c:integer; //Твои переменные, где значение длины отрезков

begin

write('Введите три длины отрезков');

read(a,b,c);

if (a>b and a>c) then

begin

if (a<(b+c)) then writeln('Да, можно');

end;

if (b>a and b>c) then

begin

if (b<(a+c)) then writeln('Да, можно');

end;

if (c>a and c>b) then

begin

if (c<(a+b)) then writeln('Да, можно');

end;

end.

Радик Хусаинов
Радик Хусаинов

Смотри. В теории треугольник можно построить, если самая большая сторона меньше чем сумма двух других меньше. Кусочек кода
var a,b,c:integer; //Твои переменные, где значение длины отрезков

begin

write('Введите три длины отрезков');

read(a,b,c);

if (a>b and a>c) then

begin

if (a<(b+c)) then writeln('Да, можно');

end;

if (b>a and b>c) then

begin

if (b<(a+c)) then writeln('Да, можно');

end;

if (c>a and c>b) then

begin

if (c<(a+b)) then writeln('Да, можно');

end;

end.

Похожие вопросы
язык Паскаль. как в турбо паскале записать это: е^x
Дан фрагмент программы на языке паскаль,
пожалуйста решите задачу в Паскале. ВВодится три отрезка. Понять, можно ли из них составить прямоугольный треугольник
Дан прямоугольник. Нужно провести два отрезка, чтобы получить 8 треугольников!
как записать в паскале. как записать в паскале произвольную степень отличную от квадрата
как записать в паскале?
Как записать в Паскале данное выражение
Даны три отрезка, надо определить какой треугольник!! ! help
что такое язык программирования паскаль? и типы данных?
Как записать в Паскале как записать данное число в Паскале e^y*b