Question

Склавиатуры вводятся 2 числа : возраст брата и возраст сестры . программа должна ответить , кто из них старше . дополнительно : в ответе программы должно быть сказано на сколько лет . вторая : признак существования треугольника: каждая его сторана должна быть меньше суммы двух других . написать программу , которая, получив с клавиатуры значения сторон треугольника a, b, c отметит , можно ли построить такой треугольник или нет . написать 2 программы . ! заранее

Answer 1

1)
var x,y:ineger;
begin
readln(x,y);
if x>y then wrietln('X starshe Y na', x-y) else writeln('Y starhe X na ',y-x);
readln;
end.

2)
var a,b,c:integer;
begin
if a+b>c then
begin
if (a+c>b) and (b+c>a) writeln('Treygolnik')
else writeln('Error');
end
else writeln('Error');
end.