Revisão Algoritmo

Revisão
1. Elaborar um algoritmo que leia o nome do alune, disciplina e a nota. Imprimir na tela todos os dados.

algoritmo "REV1" var aluno,discip: Caracter nota: inteiro inicio Escreval("Informe o nome do aluno") leia(aluno) Escreval("Informe disciplina") leia(discip) Escreval("Informe nota") leia(nota) escreval("O aluno ",aluno, " tirou",nota," em ", discip) fimalgoritmo 2. Criar um algoritmo que leia dois números e imprima apenas o maior deles.

3. Você foi contratado para resolver um problema de programação na empresa Jacl S.A.. Para solucionar criar um programa em português estruturado que solicite ao usuário um salario bruto e calcule o INSS de 8% para os salários que foram maiores que 1.000,00 e 5% para os que forem menor ou igual. Exiba na tela o salario liquido do funcionário.

4. Construir um algoritmo que imprima na tela todos os múltiplos de 5 entre 1 e 100.

5. Criar um programa no VisuALG que solicite nomes de carros infinitamente até que seja digitado.

6. Elaborar um algoritmo que preencha um vetor de inteiros com tamanho 20. Imprima apenas os valores do vetor que forem positivos.

7. Elaborar um algoritmo que preencha um vetor de números reais copie o vetor para um segundo vetor com o acréscimo de 2 em todos os elementos do segundo vetor.

algoritmo "REV7" var v1,v2: vetor [1..10] de real
I: inteiro inicio Para I de 1 ate 10 faca leia(v1[I]) Fimpara para I de 1ate 10 faca
V2[I]<-V1[I] + 2
Escreval(V2[I])
Fimpara
Fimalgoritmo

8. Criar um algoritmo que preencha uma matriz 3x3 de números inteiros e exibir na tela os valores dela subtraindo 1 de cada elemento.

algoritmo "Rev8" var M: vetor [1..3,1..3] de inteiro
L,C: inteiro inicio Para L de 1 ate 3 faca
Para C de 1 ate 3 faca leia(M[L,C]) Fimpara
Fimpara
Para L de 1 ate 3 faca
Para C de 1 ate 3 faca escreval(M[L,C]-1) fimpara fimpara fimalgoritmo

9. Criar um algoritmo que preencha 2 matrizes de números inteiros com tamanho 2x2 e preencha uma terceira com a soma das duas matrizes.