procentagem no dbgrid

Amigos, tenho uma tabela chamada TBLPESQUISA onde dependendo da escolha do usuário no form do delphi na tabela grava: EXCELENTE, MUITO BOM, BOM, REGULAR, INSUFICIENTE FÇO A SEGUINTE CONSULTA:

Select count(*) AS QUANTIDADE, PROCINSC From TBLPESQUISA Group By PROCINSC e me retorna o seguinte no grid:

QUANTIDADE PROCINSC

1 BOM

2 EXCELENTE

5 MUITO BOM

8 REGULAR

9 INSUFICIENTE

A pergunta é tem como colocar uma coluna ao lado com a porcentagem de cada item como:

QUANTIDADE PROCINSC Porcentagem(%)

1 BOM 6,25

2 EXCELENTE 12,5

5 MUITO BOM 31,25

8 REGULAR 50

Desde já agradeço.