var
a, b:integer;
begin
write('a = '); readln(a);
write('b = '); readln(b);
if a <> b then
if a > b then
b := a
else
a := b
else
begin
a := 0;
b := 0;
end;
writeln('a = ', a);
writeln('b = ', b);
readln;
end.
а)<em>8</em>"<u>бит</u>"
б)<em>0.026001</em>"<u>Кбайт</u>"
в)<em>1024</em>"<u>Кбайт</u>"-<em>1048576</em>"<u>байт</u>"-<em>8388608</em>"<u>бит</u>"
г)<em>1.5</em>"<u>Кбайт</u>"-<em>1536</em>"<u>бит</u>"
Надо чтобы в лодку сели Бах и Гэ, а Вау и Ах должны поплыть без лодки, так как они плывут быстрее, и поэтому все успеют приплыть туда и вернуться обратно за 18 часов !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!