algoritmo

uma ajuda aqui

Ler um número e imprimir se ele é igual a 5, ou se é igual a 200, ou se é igual a 400, ou se ele está no intervalo

entre 500 e 1000, ou se ele está fora dos escopos

CODE
var
num, cont : inteiro

inicio

leia (num)

se (num = 5) ou (num = 200) ou (num = 400) entao

escreva (num)

fimse

para cont de 500 ate 550 faca

se (num = cont) entao

escreva (num)

fimse

fimpara

fimalgoritmo