[Resolvido] Contando nº negativos...

Dae pessoal, eu comecei a estudar repetição em algoritmos e estou tendo dificuldade com isso. Queria saber como eu posso descobrir quantos números digitados são negativos.

->>Escrever um programa que leia 20 valores para “A”, um de cada vez, contar quantos

destes valores são negativos e escrever esta informação.

algoritmo "3"

var

a: inteiro

num,neg: inteiro

inicio

para a de 1 ate 20 faca

escreval ("Digite um numero: ")

leia (num)

se (num <= -1) entao

neg <- num

fimse

fimpara

escreval (neg)

fimalgoritmo