Duvida Duvida

[joas2]

Blz galera do forum, estou com um problema na verdade não e um problema acredito que ate seja um erro do proprio programa que esou usando mas vamos lá e assim fiz no visualg o seguinte algoritmo:

algoritmo "numeros ao quadrado"
var
n1,n2,n3,n4: inteiro
total:real
inicio
escreval("Digite 4 valores")
leia(n1,n2,n3,n4)
escreval("O quadrado destes valores são.",n1^2,n2^2,n3^2,n4^2)
total:= (n1^2+n2^2+n3^2+n4^2)
escreval("O total deste valores ao quadrado são. ",total)
fimalgoritmo

pois bem na construção tutdo ok mas o que esta errado eu quero colocar que o total seja do tipo inteiro, mas quando faço isso no visualg da erro de atribuição:

algoritmo "numeros ao quadrado"
var
total,n1,n2,n3,n4: inteiro
inicio
escreval("Digite 4 valores")
leia(n1,n2,n3,n4)
escreval("O quadrado destes valores são.",n1^2,n2^2,n3^2,n4^2)
total:= (n1^2+n2^2+n3^2+n4^2)
escreval("O total deste valores ao quadrado são. ",total)
fimalgoritmo

Dai eu gostaria de saber se sou eu que estou fazendo errado ou se é o programa que esta, pois pelo que sei inteiro são os valores de 0 ate o infinito, e real e de - infinito ate o + infinito.

desde ja agradeço a aatenção