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

Algoritmo (vetores)

Casos: Algoritmo (vetores). Pesquise 862.000+ trabalhos acadêmicos

Por:   •  26/11/2013  •  1.635 Palavras (7 Páginas)  •  1.826 Visualizações

Página 1 de 7

algoritmo "semnome"

// Função :

// Autor :

// Data : 24/11/2013

// Seção de Declarações

//Um armazém trabalha com 50 mercadorias diferentes. O dono do

// armazém anota a descrição, a quantidade de cada mercadoria

//vendida durante o mês e o seu preço unitário. Faça um algoritmo

//para calcular o faturamento mensal do armazém.

var

v: vetor [1..50] de inteiro

i, soma:inteiro

inicio

escreval ("Entre com os valores:")

para i de 1 ate 50 faca

leia (v[i])

fimpara

soma<-0

para i de 1 ate 50 faca

soma<-soma+v[i]

fimpara

escreval(soma)

fimalgoritmo

=============================================================================

algoritmo "semnome"

// Função :

// Autor :

// Data : 24/11/2013

// Seção de Declarações

//Faça um algoritmo que leia 100 valores e os escreva na ordem

//contrária à que foram digitados.

var

a:vetor[1..100] de inteiro

i:inteiro

inicio

// Seção de Comandos

para i de 1 ate 100 faca

escreval ("entre com o ",i,":")

leia(a[i])

fimpara

escreval("Numeros ao contrario")

para i de 100 ate 1 passo -1 faca

escreva(a[i])

fimpara

fimalgoritmo

=============================================================================

algoritmo "semnome"

// Função :

// Autor :

// Data : 24/11/2013

// Seção de Declarações

//Faça um algoritmo que leia 100 valores e os escreva na ordem

//contrária à que foram digitados.

var

a:vetor[1..100] de inteiro

i:inteiro

inicio

// Seção de Comandos

para i de 1 ate 100 faca

escreval ("entre com o ",i,":")

leia(a[i])

fimpara

escreval("Numeros ao contrario")

para i de 100 ate 1 passo -1 faca

escreva(a[i])

fimpara

fimalgoritmo

=============================================================================

algoritmo "semnome"

// Função :

// Autor :

// Data : 24/11/2013

// Seção de Declarações

//Faça um algoritmo para calcular a média

//aritmética de uma quantidade 10 de valores numéricos lidos.

var

n:vetor[1..3] de inteiro

i,soma:inteiro

media:real

inicio

// Seção de Comandos

para i de 1 ate 3 faca

escreval ("Informe o numero:")

leia(n[i])

fimpara

para i de 1 ate 3 faca

soma<-soma+n[i]

media<-soma/3

escreval(media)

fimpara

fimalgoritmo

=============================================================================

algoritmo "semnome"

// Função :

// Autor :

// Data : 24/11/2013

// Seção de Declarações

//Escrever um algoritmo que lê um vetor A(15)

//e o escreve. Ordene a seguir os elementos

//de A em ordem crescente e escreva novamente A.

var

v:vetor [1..15] de inteiro

i,j,aux:inteiro

inicio

// Seção de Comandos

para i de 1 ate 15 passo 1 faca

leia(v[i])

fimpara

para j de 1 ate 14 passo 1 faca

...

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