repetiçao 1

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "semnome"
// Função :
// Autor :
// Data : 28/09/2017
// Seção de Declarações
var
cont,par:inteiro
inicio
// Seção de Comandos
cont:=0
par:=2
enquanto cont<=100 faca
 se cont /2=0 entao
 escreval(cont)
 cont:=cont+2
 fimse
 fimenquanto
fimalgoritmo