MySQL 8.0

By using db<>fiddle, you agree to license everything you submit by Creative Commons CC0.
create table rooms as
     select 1 as id, 'A101' as room union all
     select 2 as id, 'A102' as room union all
     select 3 as id, 'A103' as room union all
     select 4 as id, 'A101o' as room union all
     select 5 as id, 'A102o' as room union all
     select 6 as id, 'A103o' as room 
create table beds as
     select  1 as id, 1 as roomid union all
     select  2 as id, 1 as roomid union all
     select  3 as id, 2 as roomid union all
     select  4 as id, 2 as roomid union all
     select  5 as id, 3 as roomid union all
     select  6 as id, 3 as roomid union all
     select  7 as id, 4 as roomid union all
     select  8 as id, 4 as roomid union all
     select  9 as id, 5 as roomid union all
     select 10 as id, 5 as roomid union all
     select 11 as id, 6 as roomid union all
     select 12 as id, 6 as roomid 
     
select min(case when b.bedno = 1 then b.id end) as bed_1,
       min(case when b.bedno = 1 then r.room end) as room_1,
       min(case when b.bedno = 2 then b.id end) as bed_2,
       min(case when b.bedno = 2 then r.room end) as room_2
from (select b.*,
             row_number() over (partition by bedno order by rand()) as pair
      from (select b.*,
                   row_number() over (partition by roomid order by rand()) as bedno
            from beds b
           ) b
     ) b join
     rooms r
     on b.roomid = r.id
group by pair;


bed_1
room_1
bed_2
room_2


1
A101
7
A101o

8
A101o
2
A101

4
A102
10
A102o

9
A102o
3
A102

5
A103
6
A103

11
A103o
12
A103o


with br as (
      select b.*, r.room, r.pair,
             row_number() over (partition by r.room order by b.id) as seqnum,
             dense_rank() over (partition by pair order by r.room) as pair_seqnum
      from beds b join
           (select r.*,
                   floor( (row_number() over (order by rand()) - 1) % (count(*) over () / 2)) as pair
            from rooms r
           ) r
           on b.roomid = r.id
     )
select min(case when pair_seqnum = 1 then room end) as room_1,
       min(case when pair_seqnum = 1 then id end) as bed_1,
       min(case when pair_seqnum = 2 then room end) as room_2,
       min(case when pair_seqnum = 2 then id end) as bed_2
from br
group by pair, seqnum


room_1
bed_1
room_2
bed_2


A102
3
A103
5

A102
4
A103
6

A101
1
A103o
11

A101
2
A103o
12

A101o
7
A102o
9

A101o
8
A102o
10
bed_1	room_1	bed_2	room_2
1	A101	7	A101o
8	A101o	2	A101
4	A102	10	A102o
9	A102o	3	A102
5	A103	6	A103
11	A103o	12	A103o