Queria saber o porque do uso de 3 "fimse" sendo que utilizei só um comando "se"!

Estou começando agora  a programar, faço alguns exercícios para exercitar, e queria saber porque toda vez que executo o programa

Visualg informa que esta faltando o "fimse" na linha 34, se eu colocar mais um "fimse" funciona, mas assim ficaria 3 sendo que existem apenas

2 condicionais, uma "se" e outra "se" ninhada. Segue o algorítimo, quem poder me explicar o porque, agradeço:

Algoritmo "Equação"

Var

a,b,c,x1,x2,D: real

Inicio

Escreval("----EQUAÇAO DE SEGUNDO GRAU-----")

Escreval("")

Escreval("Digite o valor de a: ")

Leia (a)

Escreval("Digite o valor de b: ")

Leia (b)

Escreval("Digite o valor de c: ")

Leia (c)

D <- (b^2)-4ac

x1 <- (-b+ RaizQ(D))/(2*a)

x2 <- (-b- RaizQ(D))/(2*a)

se (D > 0) entao

Escreval("Delta : ",D," , maior que zero, ou seja, 2 raizes")

Escreval(" X1: ", x1)

Escreval(" X2: ", x2)

senao entao

se (D=0) entao

Escreval("Delta : ", D," , sendo assim, uma raiz")

Escreval(" X1: ", x)

se não entao

Escreval("Delta: ", D," , Raiz negativa!")

fimse

fimse

Fimalgoritmo