S=V*t
V=S/t
t=S/V
S-расстояние
t-время
V-скорость
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
<span>Нельзя составить треугольник из:
1 2 3
1 2 4
1 3 4</span>
Нужен учебник, так ничего не сказать :)
Если это задание информатичке понесёшь, то пиши что-то вроде этого:
"30 декабря в Москве собрались уполномоченные делегации советских социалистических республик, которые утвердили Договор и Декларацию об образовании Союза Советских Социалистических республик (СССР)" - это словесная модель исторического события.