В одном байте 8 бит. В слове информация 10 букв. Соответственно 10 байтов.
1)var a,b,c,d,e,k : real;
begin
writeln('Введите ,b,c,d,e,k');
read(,b,c,d,e,k);
a:= (d + c + b)*e - 5k - 1
writeln(a);
end;
2)var c,x : real;
begin
writeln('Введите x');
read(x);
c:= abs(x+4) - abs(sqr(x)-3*x+6);
writeln(c);
<span>end.</span>
1) k, My_peremen
2) e = -5
3) -1
P = [1,39] q = [23,58]
для начало можно упростить выражение
P→ ¬Q<span>→ ¬A </span>≡ 1
1 до 39 занимает P
От (-бесконечности, 23) до (58, бесконечность ) занимает Q
для А остается интервал (39, 58).
тем самым получаем ответ №3