1/16 Мбайт = 2^(-4) Мбайт = 2^(-4)*2^(10) Кбайт = 2^(-4)*2^(10)*2^(10) байт = 2^(-4+10+10) байт = 2^(16) байт = 65536 байт
1) 1 Кбайт, 1000 байтов, 1 байт, 1024 бита, 1 бит
2) 10 битов, 20 битов, 2 байта, 1010 байтов, 1Кбайт
Решение №1
var x,y:integer;
begin
readln(x,y);
if x> y then begin
x:=x+y;
y:=x-y;
x:=x-y;
writeln(x,' ',y);
end.
Тестовое решение:
8 5
5 8
Решение №2
На PascalABC.Net можно сделать проще:
var x,y:integer;
begin
readln(x,y);
if x>y then begin swap(x,y); println(x,y); end;
end.
a) F=A∧ ¬B∧C
b) F=¬A∨B∨C
c) F=X∨(¬Y∧(X∧Y))=X∨¬Y∧X∧Y=X∨¬Y∧Y=X
d) F=(X^X)v(X^¬Z)v(Z^X)v(Z^¬Z)^¬X=X^(X^¬Z)v(Z^X)^¬X=X^¬X^(X^¬Z)v(Z^X)=(X^¬Z)v(Z^X)