Даны переменные X,Y,Z. Если их сумма положительна, то вывести "YES" иначе-вывести

program zz1;

var x, y, z:integer; //задаем переменные целого типа

begin

write ( введите первое число );  // вводим с клавиатуры 1-ое число

read (x);  

write ( введите второе число );  // вводим с клавиатуры 2-ое число

read (y);

write ( введите третье число );  // вводим с клавиатуры третье число

read (z);

if x + y + z gt; 0 // проверяем, если сумма трех введенных данных чисел положительная, то

then writeln ( YES )  // выводим один ответ

else writeln ( NO );  // по другому, выводим иной ответ

end.