TrabalhosGratuitos.com - Trabalhos, Monografias, Artigos, Exames, Resumos de livros, Dissertações
Pesquisar

Matriz 50x50 Arvore De Nata

Monografias: Matriz 50x50 Arvore De Nata. Pesquise 862.000+ trabalhos acadêmicos

Por:   •  6/11/2014  •  1.200 Palavras (5 Páginas)  •  428 Visualizações

Página 1 de 5

algoritmo "Matriz_50x50_Arvore_Natal"

// Função :

// Autor :

// Data : 30/10/2014

// Seção de Declarações

//

//-Em uma matriz de 50x50 desenhe e imprima uma arvore de natal

//

var

mapa: vetor[1..50,1..50] de inteiro

linha, coluna: inteiro

inicio

//

linha <- 0

coluna <- 0

//

// Dados para matriz

para linha de 1 ate 50 faca

para coluna de 1 ate 50 faca

//

mapa[linha,coluna] <- 8

//

fimpara

fimpara

//

mapa[1,1] <- 0

mapa[1,2] <- 0

mapa[1,3] <- 0

mapa[1,4] <- 0

mapa[1,5] <- 0

mapa[1,6] <- 0

mapa[1,7] <- 0

mapa[1,8] <- 0

mapa[1,9] <- 0

mapa[1,10] <- 0

mapa[1,11] <- 0

mapa[1,12] <- 0

mapa[1,13] <- 0

mapa[1,14] <- 0

mapa[1,15] <- 0

mapa[1,16] <- 0

mapa[1,17] <- 0

mapa[1,18] <- 0

mapa[1,19] <- 0

mapa[1,20] <- 0

mapa[1,22] <- 0

mapa[1,25] <- 0

mapa[1,28] <- 0

mapa[1,30] <- 0

mapa[1,31] <- 0

mapa[1,32] <- 0

mapa[1,33] <- 0

mapa[1,34] <- 0

mapa[1,35] <- 0

mapa[1,36] <- 0

mapa[1,37] <- 0

mapa[1,38] <- 0

mapa[1,39] <- 0

mapa[1,40] <- 0

mapa[1,41] <- 0

mapa[1,42] <- 0

mapa[1,43] <- 0

mapa[1,44] <- 0

mapa[1,45] <- 0

mapa[1,46] <- 0

mapa[1,47] <- 0

mapa[1,48] <- 0

mapa[1,49] <- 0

mapa[1,50] <- 0

mapa[2,1] <- 0

mapa[2,23] <- 0

mapa[2,25] <- 0

mapa[2,27] <- 0

mapa[2,50] <- 0

mapa[3,1] <- 0

mapa[3,21] <- 0

mapa[3,22] <- 0

mapa[3,24] <- 0

mapa[3,25] <- 0

mapa[3,26] <- 0

mapa[3,28] <- 0

mapa[3,29] <- 0

mapa[3,50] <- 0

mapa[4,1] <- 0

mapa[4,23] <- 0

mapa[4,25] <- 0

mapa[4,27] <- 0

mapa[4,50] <- 0

mapa[5,1] <- 0

mapa[5,22] <- 0

mapa[5,25] <- 0

mapa[5,28] <- 0

mapa[5,50] <- 0

mapa[6,1] <- 0

mapa[6,24] <- 0

mapa[6,26] <- 0

mapa[6,50] <- 0

mapa[7,1] <- 0

mapa[7,23] <- 0

mapa[7,27] <- 0

mapa[7,50] <- 0

mapa[8,1] <- 0

mapa[8,22] <- 0

mapa[8,25] <- 0

mapa[8,28] <- 0

mapa[8,50] <- 0

mapa[9,1] <- 0

mapa[9,21] <- 0

mapa[9,24] <- 0

mapa[9,25] <- 0

mapa[9,26] <- 0

mapa[9,29] <- 0

mapa[9,50] <- 0

mapa[10,1] <- 0

mapa[10,20] <- 0

mapa[10,25] <- 0

mapa[10,30] <- 0

mapa[10,50] <- 0

mapa[11,1] <- 0

mapa[11,19] <- 0

mapa[11,31] <- 0

mapa[11,50] <- 0

mapa[12,1]

...

Baixar como (para membros premium)  txt (10.9 Kb)  
Continuar por mais 4 páginas »
Disponível apenas no TrabalhosGratuitos.com