Даны три действительных числа: a, b, c. Проверьте, выполняется ли равенство a + b = c . Если равенство выполняется, выведите YES, если не выполняется, выведите NO.

Входные данные
Числа a, b, c – действительные, положительные, не превосходят 10 и заданы не более, чем с 7 знаками после точки.

Ответы

Ответ дал: HappyCoder
0

Ответ:

begin

 var (a, b, c) := ReadReal3('Введите 3 числа: ');

 if (a + b = c) then

   Print('Yes')

 else

   Print('No');

end.

Ответ дал: muabazov
0
паскаль авс
Вас заинтересует