Ответ:
51
Объяснение:
1) НЕ ((x > 50) или НЕ (х чётное))
2) НЕ (x > 50 или х нечётное)
3) x 
50 и х чётное
4) Ищем число, которое больше 50 и нечетное
В одном байте 8 бит. В слове информация 10 букв. Соответственно 10 байтов.
1-а
2-b
3-a,c
4-c
5-b или c
6-c
7-a
8-b или c
9 не видно
СХЕМА ВО ВЛОЖЕНИИ
var
x,y:real;
begin
readln(x);
if x<0 then writeln('не существует')
else
begin
y:=2*x*sqrt(x+sqrt(x));
Writeln('x: ',x:4:2,' y: ',y:4:2) ;
if (x>=0)and(x<=2)and(y>=0)and(y<=1)then writeln('принадлежит')
else
writeln('не принадлежит')
end;
<span>end.
</span><span>
</span>
Var a,b,c,y1,y2,d,i:real;
begin
read(a,b,c);
d:=b*b-4*a*c;
if d>0 then
begin
y1:=(-1*b+sqrt(d))/(2*a);
y2:=(-1*b-sqrt(d))/(2*a);
if y1>=0 then
begin
writeln(sqrt(y1));
writeln(sqrt(y1)*-1);
end;
if y2>=0 then begin
writeln(sqrt(y2));
writeln(sqrt(y2)*-1);
end;
end else
if d=0 then
begin
y1:=(-1*b)/(2*a);
if y1>=0 then begin
writeln(sqrt(y1));
writeln(sqrt(y1)*-1);
end;
end
else
writeln('Корней нет');
<span>end.</span>
