P = [1,39] q = [23,58]
для начало можно упростить выражение
P→ ¬Q<span>→ ¬A </span>≡ 1
1 до 39 занимает P
От (-бесконечности, 23) до (58, бесконечность ) занимает Q
для А остается интервал (39, 58).
тем самым получаем ответ №3
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var (sn,pp,kp):=(0,1,0);
var n:integer;
repeat
Read(n);
if (n<0) and n.IsOdd then sn+=n
else
if (n>0) and (n mod 3=0) then begin pp*=n; kp+=1 end
until n=0;
if sn=0 then begin
Writeln('Нет отрицательных нечетных чисел');
if kp=0 then Writeln('Нет положительных чисел, кратных 3')
else Writeln('Произведение положительных чисел, кратных 3: ',pp)
end
else begin
Writeln('Сумма отрицательных нечетных чисел: ',sn);
if kp=0 then Writeln('Нет положительных чисел, кратных 3')
else Writeln('Произведение положительных чисел, кратных 3: ',pp)
end
end.
<u>Пример</u>
-367 23 62 7 12 -24 90 152 -63 0
Сумма отрицательных нечетных чисел: -430
Произведение положительных чисел, кратных 3: 1080
Кроме того, что ее можно перенастроить на любую из команд, какую сам захочешь, она также возвращает в начало списка, страницы, текста и того подобного.
Ответ:Ммм... Паскаль) Для этого сайты есть.
Объяснение:
2/1= 2
2/2= 4
2/3= 8
2/4= 16
2/5= 32
2/6= 64
2/7= 128
2/8= 256
2/9= 512
2/10= 1024