Напиши наибольшее целое число Z, для которого истинно высказывание:
НЕ(Z< 3) И (Z < 8)

ответ:7

НЕ(Z< 3) И (Z < 8) - > z>=3 и z < 8 -> 3<=z<8

наибольшее число это 7

var

s,a,n,i,min,max: integer;

begin

min: =32767;

max: =-32768;

readln(n);

for i: =1 to n do

begin

readln(a);

if a< min then min: =a;

if a> max then max: =a;

end;

s: =(min+max)/2;

writeln(s);

end.

s : = 0

for i : = 1 to n do

  if i mod 2 = 1 then

      s : = s - 1/2/n

  else

      s : = s + 1/2/n;