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.