Question

Даны три действительных числа: a, b, c. Проверьте, выполняется ли равенство a+b=c Формат входных данных С клавиатуры вводятся числа a, b, c — действительные, положительные, не превосходят 10 и заданы не более, чем с 7 знаками после точки. Формат выходных данных Если равенство выполняется, выведите «YES», если не выполняется, выведите «NO». Примеры входные данные выходные данные 2 3 7 NO 0.2 0.3 0.5 YES

Answer 1

Var
  a, b, c: real;

begin
  readln(a, b, c);
  if a + b = c then
    writeln('YES')
  else
    writeln('NO')
end.