35б. программирование. pascal с клавиатуры вводятся 4 положительных числа – длины отрезков. вывести на экран построчно сочетания длин отрезков, из которых нельзя составить треугольник.

213

227

Посмотреть ответы 2

Ответы на вопрос:

Волк123111

Информатика

4,8(100 оценок)

Var a,b,c,d: integer; begin readln(a,b,c,d); writeln('нельзя составить треугольник из: '); if (a+b< =c)or(a+c< =b)or(b+c< =a) then writeln(a,' ',b,' ',c); if (a+b< =d)or(a+d< =b)or(b+d< =a) then writeln(a,' ',b,' ',d); if (a+c< =d)or(a+d< =c)or(c+d< =a) then writeln(a,' ',c,' ',d); if (b+c< =d)or(b+d< =c)or(c+d< =b) then writeln(b,' ',c,' ',d); end. пример: 1 2 3 4 нельзя составить треугольник из: 1 2 31 2 41 3 4