Придумайте две задачи на конъюнкцию и дизъюнкцию(с решением)
<span>пожалуйста</span>
что бы команды были гарантированно выполненны по крайней мере один раз нужно использовать цикл с постусловием Repeat
repeat
<em>операторы</em>
until <em>условие</em>
var a:array[1..10] of integer;
i,tmp:integer;
begin cls;
for i:=1 to 10 do a[i]:=i;
for i:=1 to 10 do
begin
if i mod 2 = 1 then
begin
tmp:=a[i];
a[i]:=a[i+1];
a[i+1]:=tmp;
end;
end;
for i:=1 to 10 do
write(a[i], ' ');
end.
А) последовательность чисел в 3-й степени: 1,8,27,125,216,343,512 и т.д.
б) к каждому числу прибавляется 9 и получается следующее число: 69+9=78+9=87....
69,78,87,96,105,114,123,132 и т.д.
в) 12=11+2^1, 14=12+2^1, 18=14+2^2, след число получаем: 18+2^3=26, 26+2^4=42 и т.д.
г) 10,11,100,111,1000,1111