Program z1;
var a:array[1..10] of byte;
i,j,k,r:byte;
begin
randomize;
for i:=1 to 10 do begin
a[i]:=random(100);
write(a[i],' ');
a[i]:=(a[i] div 10)+(a[i] mod 10)
end;
k:=1;writeln('');
for j:=0 to 18 do begin
i:=k;
while i<=10 do begin
if a[i]=j then begin
r:=a[k];a[k]:=a[i];a[i]:=r;
write(a[k],' ')
end;
i:=i+1
end
end;
readln
end.
1) <span>122 (8) = 82 (10)
</span>1A9 (16)<span> = 425 (</span><span>10)
</span><span>35.2 (6) = 23.33 (<span>10)
2) а) </span></span>11000100 (2)<span> = 304 (</span><span>8)
</span>11000100 (2) = C4 (<span>16)
</span> б) 110000 (2) = 60 (8)
110000 (2) = 30 (16)
в) <span>111000000110101 (2) = 70065 (8)</span>
111000000110101 (2) = 7035 (<span>16)</span>
n=int(input())
min_na20=30000
for i in range(n):
x=int(input())
if x<min_na20 and x%20==0:
min_na20=x
print(min_na20)
¬(A ∨ ¬B) ∨ ¬(A ∨ B) ∨ (A ∧ B) =
(¬A ∧ B) ∨ (¬A ∧ ¬B) ∨ (A ∧ B) =
¬A ∧ (B ∨ ¬B) ∨ (A ∧ B) =
¬A ∨ (A ∧ B) =
¬A ∨ B