Automatize o volume de consultas de atualização em pl\sql

begin 
  for i in 36 .. 50 loop
    UPDATE   Table_1 
    SET vchar_val = REPLACE (vchar_val, '.'|| i ||'0/', '.'|| i+1 ||'0/')
    WHERE vchar_val LIKE 'http://services%.'|| i ||'0/%'
    AND c_version IN ('ALL', 'N/A', i+1 ||'.0'); 
  end loop;
end;