Для каких значений x и y истинно высказывание: (y+1 > x) (y+x < 0) (x > 1)? 1) x = 0,5; y = -1,1 2) x = 1,1; y = -4 3) x = -1; y = -4 4) x = -0,1; y = -1,1

Высказывании (y+1 > x) ∧ (y+x < 0) ∧ (x> 1) истинно, если истинен каждый из трех предикатов. 1) x = 0,5; y = -1,1 y+1 > x; -1.1+1 > 0.5; -0.1 > 0.5 ложно и данный набор значений не подходит. 2) x = 1,1; y = -4 y+1 > x; -4+1 > 1.1; -3 > 1 ложно и данный набор значений не подходит. 3) x = -1; y = -4 y+1 > x; -4+1 > -1; -3 > -1 ложно и данный набор значений не подходит. 4) x = -0,1; y = -1,1 y+1 > x; -1.1+1 > -0.1; 0-.1 > -0.1 ложно и данный набор значений не подходит. ответ: все четыре варианта не подходят.

Утебя нет ни одного подходящего варианта. самый вероятный №2, но и там в первой скобке ложь. перепроверь

1)

var 

a,b,c: real;

begin

readln(a,b);

c: =180-a-b;

if (a> 90) or (b> 90) or (c> 90) then writeln('тупоугольный')

else

if  (a=90) or (b=90) or (c=90) then writeln('прямоугольный')

else  writeln('остроугольный');

end.

2)

var

v: real;

begin

readln(v);

if v< 7.8 then writeln ('ракета упадет на землю');

if v=7.8 then  writeln ('ракета станет спутником земли');

if (v> 7.8) and (v< =16.4) then  writeln ('ракета останется в пределах солнечной системы'); if (v> 16.4) then  writeln ('ракета покинет пределы солнечной системы');  

end.

 

var a: array[1..100] of integer;

i,ms,ps: integer;

begin

  {vvod massiva a}

  for i: = 1 to 100 do

    if a[i] > 0 then ps: =ps+a[i]

    else ms: =ms+a[i];

  writeln(ps,ms);

 

end.