Oracle 11g Release 2

By using db<>fiddle, you agree to license everything you submit by Creative Commons CC0.

with x(food_item, food_area, food_loc, food_exp) as (
    select 'A1', 'lxgs', 'argentina', date '2020-01-01' from dual union all
    select 'B1', 'iyan', 'usa',       date '2021-05-31' from dual union all
    select 'C1', 'lxgs', 'peru',      date '2020-04-01' from dual union all
    select 'D1', 'wa8e', 'norway',    date '2019-10-01' from dual union all
    select 'E1', '894a', 'laos',      date '2019-05-01' from dual union all
    select 'F1', '894a', 'laos',      date '2019-09-17' from dual ),
  y(food_item, organic) as (
    select 'A1', 'Y' from dual union all
    select 'B1', 'Y' from dual union all
    select 'C1', 'N' from dual union all
    select 'D1', 'N' from dual union all
    select 'E1', 'Y' from dual union all
    select 'F1', 'N' from dual ),
  z(food_item, food_type) as (
    select 'A1', '189' from dual union all
    select 'A1', '190' from dual union all
    select 'B1', '191' from dual union all
    select 'C1', '189' from dual union all
    select 'D1', '192' from dual union all
    select 'E1', '193' from dual union all
    select 'F1', '193' from dual ),
  t1 as (
    select rn, food_item, food_area, food_loc country, food_exp, food_type,
           decode(substr(food_area, 4, 1), 's', 'SA', 'n', 'NA', 'e', 'EU', 'a', 'AS') continent,
           case organic when 'Y' then 1 else 0 end org,
           case when food_type = '189' then 1 else 0 end gra,
           case when food_type = '190' then 1 else 0 end red,
           case when food_type = '191' then 1 else 0 end gol,
           case when food_type = '192' then 1 else 0 end gal,
           case when food_type = '193' then 1 else 0 end fuj 
      from (select rownum rn, x.* from x) x join y using (food_item) join z using (food_item)
      where food_exp > sysdate),
  t2 as (
    select rn, country, continent, max(org) org, max(gra) gra, 
           max(red) red, max(gol) gol, max(gal) gal, max(fuj) fuj,
           case when max(gra) + max(red) + max(gol) + max(gal) + max(fuj) > 1 
                then 1 else 0 
            end mix
       from t1 group by rn, country, continent)
select continent, country, sum(org) organic_fd, sum(gra) granny, sum(red) red_delc, 
       sum(gol) golden_bag, sum(gal) gala_bag, sum(fuj) fuji_bag, sum(mix) mixed_bag 
  from t2 group by continent, country;

CONTINENT	COUNTRY	ORGANIC_FD	GRANNY	RED_DELC	GOLDEN_BAG	GALA_BAG	FUJI_BAG	MIXED_BAG
NA	usa	1	0	0	1	0	0	0
SA	argentina	1	1	1	0	0	0	1
AS	laos	1	0	0	0	0	2	0
SA	peru	0	1	0	0	0	0	0
EU	norway	0	0	0	0	1	0	0