Даны три действительных числа: a, b, c. Проверьте, выполняется ли равенство a + b = c . Если равенство выполняется, выведите YES, если не выполняется, выведите NO.
Ответы
Ответ дал:
0
program ABC;
{$APPTYPE CONSOLE}
uses SysUtils;
var
a,b,c:integer;
begin
readln(a,b,c);
if(a+b=c)then writeln('YES')
else writeln('NO');
readln;
end.
{$APPTYPE CONSOLE}
uses SysUtils;
var
a,b,c:integer;
begin
readln(a,b,c);
if(a+b=c)then writeln('YES')
else writeln('NO');
readln;
end.
Вас заинтересует
1 год назад
6 лет назад
9 лет назад