Vetor
1-/*Faça um programa que leia o nome, o sexo e a idade de 30 pessoas. Depois calcule e
mostre:
* a quantidade de mulheres;
* a quantidade de homens;
* o percentual de mulheres com mais de 30 anos;
* o percentual de homens com mais de 30 anos;
* mostre um relatorio com o nome, o sexo e a idade das 30 pessoas.
OBS.: valide a entrada dos dados*/
algoritmo
{
literal nome[30];
caracter sexo[30];
inteiro cont, sf = 0, qth = 0;
inteiro idade[30];
inteiro qtf = 0, sm = 0, qtm = 0;
real percM = 0, percH = 0,mediaM, mediaF;
para(cont=0; cont<30; cont=cont+1)
{
escreva("Digite o nome da ",(cont+1),"ª pessoa"); leia(nome[cont]);
faça
{
escreva("Digite a idade da ",(cont+1),"ª pessoa"); leia(idade[cont]);
}enquanto(idade[cont]<0 e idade[cont]>120);
faça
{
escreva("Digite o sexo da ",(cont+1),"ª pessoa"); leia(sexo[cont]);
}enquanto(sexo!='f' ou sexo!='m');
se(sexo[cont]='f')entao
{
qtf=qtf+1;
}senão{
sf=sf+idade[cont];
qtf=qtf+1;
}
se(sexo[cont]='m')entao
{
qth=qth+1;
}senão{
sm=sm+idade[cont];
qtm=qtm+1;
}
percM=qtm/30*100;
percH=qth/30*100;
}
escreva("O percentual de mulheres;",percH);
mediaF=sf/qtf;
escreva("O percentual de homens;",percM);
mediaM=sm/qtm;
para(cont=0; cont<30; cont=cont+1)
{
escreva(nome[cont]," ",idade[cont]," ",sexo[cont]);
}
}
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
2-/*Faça um programa que preencha dois vetores (A e B) de tamanho 5 cada um com numeros
inteiros positivos.
Depois calcule e mostre um terceiro vetor(C) que é formado pela subtração dos elementos do
primeiro vetor pelos
elementos do segundo vetor conforme a figura abaixo:*/
0 1 2 3
4
A | 5 | 6 | 7 | 23 | 40 |
0
1 2 3
4
B | 4 | 4 | 3 | 12 | 23|
0
1
2 3 4
C | 1 | 2 | 4 | 11 | 17 |
algoritmo
{
inteiro vetorA[5];
inteiro vetorB[5];
inteiro vetorC[5];
inteiro cont;
para(cont=0;cont<5;cont=cont+1)
{
escreva("Digite o numero a ser armazenado no primeiro vetor");
leia(vetorA[cont]);
escreva("Digite o numero a ser armazenado no segundo vetor");
leia(vetorB[cont]);
}
para(cont=0;cont<5;cont=cont+1)
{
vetorC[cont]=vetorA[cont]-vetorB[cont];
escreva(vetorB[cont]);
}
}
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
3-/*Faça um programa que preencha um vetor de 10 posições de tamanho 5, com números
inteiros positivos.
Depois calcule e mostre um segundo vetor (C) que é formado pelos elementos do primeiro ao
contrário:*/
algoritmo
{
inteiro vetorA[5];
inteiro vetorB[5];
inteiro cont, cont2=5;
para(cont=0;cont<5;cont=cont+1)
{
faça
{
escreva("escreva o numero do primeiro vetor"); leia=(vetorA[cont]);
}enquanto(vetorA[cont]<0);
vetorB[cont2]=vetorA[cont];
cont2=cont2-1;
}
para(cont=0;cont<5;cont=cont+1)
{
escreva(vetorA[cont]);
escreva(vetorB[cont]);
}
}
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
4/*Faça um programa que leia o salário bruto de 15(quinze funcionários) e armazene em um
vetor, e de acordo com as taxas mostre o salario liquido*/
algoritmo
{
real vetorA[15];
inteiro cont;
real salarioliquido;
para(cont=0;cont<15;cont=cont+1)
{
escreva("Digite o salario"); leia=(vetorA[cont]);
se(vetorA[cont]<1.174.86)entao
{
inss=vetorA[cont]*8/100;
}senão{
se(vetorA[cont]>=1.174.87 e vetorA[cont]<1.958,10)então
{
inss=vetorA[cont]*9/100;
}senão{
se(vetorA[cont]>=1.958.11 e vetorA[cont]<3.916.20)então
{
inss=vetorA[cont]*11/100;
}
}
}
se(vetorA[cont]<1.637.11)entao
{
irrf=0;
}senão{
se(vetorA[cont]>=1.637,12 e vetorA[cont]<2.453,50)entao
{
irrf=vetorA[cont]*7.5/100;
}senão{
se(vetorA[cont]>=2.453.51 e vetorA[cont]<3.271.38)entao
{
irrf=vetorA[cont]*15/100;
}senão{
se(vetorA[cont]>=3.271,39 e
vetorA[cont]<4.087,65)entao
{
irrf=vetorA[cont]*22.5/100;
}senão{
irrf=vetorA[cont]*27.5/100;
}
}
}
}
salarioliquido=vetorA[cont]-irrf-inss;
escreva("O salario liquido do ",(cont+1),"º funcionatio é",salarioliquido);
}
}
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
5/*- Uma empresa compra 3(três) produtos de diversos fabricantes, onde são cadastrados
para cada produto:
o nome, a quantidade em estoque, o preço e a cor. Depois a empresa precisa que sejam
emitidos os seguintes relatórios:
* Qual o produto que possui a maior quantidade em estoque, e qual o que tem a
menor quantidade;
* Qual o produto mais caro e o mais barato;
* Quais os produtos que são de cor Azul;
* Emita um relatório com o nome da mercadoria, o fabricante, a cor, a quantidade em
estoque, o preço, e o que foi pedido acima.
Obs.:
* Armazene os dados dos produtos em vetores distintos, ou seja, um vetor para o
nome, um para a quantidade, um para o preço e outro para a cor.
* Valide a entrada de dados. */
algoritmo
{
inteiro cont;
real preco[3];
caracter nome[3];
inteiro qtde[3];
literal cor[3];
real maiorqtde = 0, menorqtde = 0, maiscaso = 0, maisbarato = 0;
literal nomemaiorqtde = 0, nomemenorqtde = 0, nomemaiscaso = 0, nomemaisbarato
= 0;
para(cont=0;cont<3;cont=cont+1)
{
escreva("Digite o nome do",(cont+1),"º produto:");
leia(nome[cont]);
faça
{
escreva("Digite a qtde do",(cont+1),"º produto");
leia(qtde[cont]);
}enquanto(qtde[cont]<0);
faça
{
escreva("Digite o preço do",(cont+1),"º produto");
leia(preco[cont]);
}enquanto(preco[cont]<0);
escreva("Digite a cor do",(cont+1),"º produto");
leia(cor[cont]);
}
para(cont=0;cont<3;cont++)
{
se(cont==0)entao
{
maiorqtde=qtde[cont];
nomemaiorqtde=nome[cont];
}senao{
se(qtde[cont]>maiorqtde)entao
{
maiorqtde=qtde[cont];
nomeMaiorqtde=nome[cont]
}
}
}
para(cont=0;cont<3;cont++)
{
se(cont==0)entao
{
menorqtde=qtde[cont];
nomemenorqtde=nome[cont];
}senao{
se(qtde[cont]<menorqtde)entao
{
menorqtde=qtde[cont];
nomemenorqtde=nome[cont];
}
}
}
para(cont=0;cont<3;cont++)
{
se(cont==0)entao
{
maiscaso=preco[cont];
nomemaiscaso=nome[cont];
}senao{
se(preco[cont]>maiscaso)entao
{
maiscaso=preco[cont];
nomemaiorcaso=nome[cont];
}
}
}
para(cont=0;cont<3;cont++)
{
se(cont==0)entao
{
maisbarato=preco[cont];
nomemais barato=nome[cont];
}senao{
se(preco[cont]<maisbarato)entao
{
maisbarato=preco[cont];
nomemaisbarato=nome[cont];
}
}
}
escreva("Os sequintes produtos tem cor azul");
para(cont=0;cont<3;cont++)
{
se(cor[cont]=="azul")entao
{
escreva(nome[cont]);
}
}
escreva("Os produtos cadastrados:");
para(cont=0;cont<3;cont++)
{
escreva(nome[cont]," ",qtde[cont]," ",preco[cont]," ",cor[cont]);
}
escreva("o produto de maior qtde:",nomemaiorqtde);
escreva("o produto de menor qtde:",nomemenorqtde);
escreva("o produto mais caro:",nomemaiscaso);
escreva("o produto mais barato:",nomemaisbarato);
}