grant select on all tables to user

declare
v_grant varchar2 (500);
begin
for cur in (select distinct table_name from user_tables)
loop
v_grant :=' grant select on ' || cur.table_name || ' to orhan';
execute immediate v_grant;
dbms_output.put_line(v_grant);

end loop;
end;