Подскажите ответ:

(X && !Y) = 1 при каких значениях Х и Y

X = 0, Y = 0
X = 0, Y = 1
X = 1, Y = 0
X = 1, Y = 1

X = 1, Y = 0

Объяснение:

!0 - это 1

1 && 1 = 1

(1 && !0) = 1

program xxx;

  var a, b, s, i : integer;

begin

  write('введите а-');

  readln (a);

  write('введите b-');

  readln (b);

  s: =0;   for i: = a to b do        s: =s + i * sqr(i);

    writeln ('сумма кубов =', s)

end.

2 var  3 s: string;   4 begin  5  readln(s); 6  while  pos('с',s)> 0  do  delete(s,pos('с',s),1); 7writeln(s);   8 end.это точно