visualg

[kewin 0]

Alguém poderia resolver? não estou conseguindo, com vetores

 

1) faça um algoritmo que armazene os valores e retorne para a tela o quadrado de todos os valores

 

2) faça um algoritmo que armazena os valores reais, reajuste os valores pares em 2% e os valores ímpares em 5%. Exibir os novos valores na tela.

3) Faça um algoritmo que armazene no primeiro vetor 10 valores e no seguinte vetor 10 valores. em um terceiro vetor armazena a soma dos valores do vetor e com o vetor 2

[Sergio Cavalcante 6]

1 quest

algoritmo "ajuda"

// Autor : Sergio Cavalcante

// Data : 24/05/2014

// Seção de Declarações

var

numquadrado:vetor[1..3]de inteiro

i:inteiro

inicio

para i de 1 ate 3 faca

Escreva("informe os numeros: ")

leia(numquadrado)

fimpara

Escreval("__________________________________________________")

para i de 1 ate 3 faca

Escreval(numquadrado, " ao quadrado é: " ,numquadrado^2)

fimpara

fimalgoritmo

amigo não me leve a mal não copie somente ...más treine e poste aqui o que você conseguiu fazer de maneira diferente...........

****************************************************************************************************************************

quest 2

 

var

num:vetor[1..4]de inteiro

i:inteiro

inicio

para i de 1 ate 4 faca

Escreva("informe os numeros: ")

leia(num)

fimpara

para i de 1 ate 4 faca

se (num mod 2= 0) entao //pesquise sobre mod e div

Escreval("O ",i,"º numero digitado é par : " ,num*0.05)

senao

Escreval("O ",i,"º numero digitado é impar: " ,num*0.10 )

fimse

fimpara

fimalgoritmo

[kewin 0]

Obrigado

[Sergio Cavalcante 6]

******************************************************************************************************************************************************

quest 3

algoritmo "ajuda"

// Data : 24/05/2014

// Seção de Declarações

//Autor:Sergio Cavalcante

var

num1:vetor[1..4]de inteiro

num2:vetor[1..4]de inteiro

soma:vetor[1..4]de inteiro

i,J:inteiro

inicio

Escreval("----------------------------------------------------------")

Escreval("")

para i de 1 ate 4 faca

Escreva("informe" ,i,"º numeros para o vetor 1 : ")

leia(num1)

fimpara

Escreval("----------------------------------------------------------")

Escreval("")

para i de 1 ate 4 faca

Escreva("informe" ,i,"º numero para o vetor 2 : ")

leia(num2)

fimpara

para j de 1 ate 4 faca

soma[j]<- num1[j]+ num2[j])

fimpara

Escreval("----------------------------------------------------------")

Escreval("")

para j de 1 ate 4 faca

Escreval("O ",j,"º numero digitado foi ",num1[j]," + ",num2[j]," = ",soma[j])

fimpara

Escreval("----------------------------------------------------------")

fimalgoritmo

não adianta só copiar você tem que entender como cada coisa se comporta no algoritmo.. repita isso varias vezes, apague algumas variaveis para ver o que acontece ate fixar ...

[kewin 0]

Blz, estou pegando esse assunto agora ainda tenho umas dificuldades

[Sergio Cavalcante 6]

Se isso resolveu o seu problema então marque como resolvido...grato