Question

Задача1: Составить программу, которая, если введенное число отрицательное, меняет его на противоположное.
Задача2: Треугольник существует только тогда, когда сумма любых двух его сторон больше третьей.
Дано: a, b, c – стороны предполагаемого треугольника.Требуется сравнить длину каждого отрезка с суммой двух других. Если хотя бы в одном случае отрезок окажется больше суммы двух других, то треугольника с такими сторонами не существует.

Answer 1

(в паскале):
program rwerwe;
var
a,b: integer;
begin
read(a);
If a<0 then begin b=:a*-1; write (,b,); end else write (,a,)
end.
pr....
var
a,b,c: real;
begin
read (a,b,c)
If (ABS(a-b)<c) or (ABS(b-c)<a) or (ABS(c-a)<b) then write ('треугольник не существует')
else write ('треугольник  существует')
end.

Answer 2

это 1?