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

Question

Информатика

Мася

12 апреля, 07:21

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

+5

Ответы (2)

Знаете ответ на вопрос?

Риммура · Answer 1

Pascal

var x, y, z:integer;

begin

readln (x, y, z) ;

if (x+y+z) >0 then writeln ('YES')

else writeln ('NO') ;

end.

Надеюсь на "Лучший ответ"

Эллада · Answer 2

VB.

Dim x As Integer

Dim y As Integer

Dim z As Integer

x = InputBox ("Введите x")

y = InputBox ("Введите y")

z = InputBox ("Введите z")

If (x+y+z) > 0 then MsgBox ("YES") else MsgBox ("NO")