Atividade lógica de programação 3

Prévia do material em texto

Aluna: Felicia Soares do Nascimento 
Atividade apresentada ao professor Daniel Brandão, do curso De Engenharia Civil da Faculdade Três Marias, como requisito avaliativo da disciplina de lógica de programação.
 João Pessoa - 2019
1. Escreva um algoritmo que leia do usuário dois números, em seguida informe o valor resultado da multiplicação deste
Pseudocódigo/ diagrama 
ALGORITMO: 
RESULTADO DA MULTIPLICAÇÃO 
VAR
 2, 4: REAL; 
INICIO 
 
 ESCREVA('INFORME UM NÚMERO’); 
 LEIA(2); 
 
 ESCREVA('INFORME OUTRO NÚMERO’); 
 LEIA(4);
 ESCREVA ('A MULTIPLICAÇÃO DOS NÚMEROS É: ', (2*4))
 LEIA( 8)
FIMALGORITIMO
2. Escreva um algoritmo que leia do usuário o valor da base e da altura de um triângulo, em seguida exiba o valor da área deste;
Pseudocódigo/ Diagrama 
ALGORITMO:
 ” CALCULAR A ÁREA DE UM TRIÂNGULO” 
VAR 
 ÁREA, BASE, ALTURA: REAL
INÍCIO
 ESCREVA(‘INFORME A ALTURA: ‘);
 LEIA(2);
 ESCREVA(‘INFORME A BASE: ‘); 
 LEIA(5);
 ÁREA <- (2*5)/2
 ESCREVAL(‘ÁREA DO TRIÂNGULO É’,)
LEIA(5)
FIMALGORITMO
3. Escreva um algoritmo que leia do usuário o ano de seu nascimento, em seguida exiba a sua idade;
Pseudocódigo/ diagrama 
ALGORITMO: 
 "IDADE"
VAR	
 ANO NASCIMENTO ,IDADE, ANO ATUAL: INTEIRO 
INÍCIO
 ESCREVA ("QUAL ANO DE NASCIMENTO . ")
 LEIA(2000)
ESCREVA (“ANO ATUAL)
LEIA 2019
19<-2019-2000)
 ESCREVA ("VOCÊ TEM ",19," ANOS DE IDADE. ")
 LEIA(19)
FIMALGORITMO
4. Escreva um algoritmo que leia um número, em seguida calcule e informe se este é par ou ímpar.
Pseudocódigo 
ALGORITMO: "PAR OU IMPAR"
MEMÓRIA:
 NUMERO : INTEIRO
INICIO
ESCREVA("ESCREVA UM NÚMERO: ")
 LEIA(3)
 SE NUMERO MOD 2 = 0 ENTAO 
 ESCREVAL("", NUMERO, " É PAR!")
 SENAO
 ESCREVAL("", NUMERO, " É ÍMPAR!")
 O FIMSE
FIMALGORITMO
5. Escreva um programa que leia dois números, em seguida calcule e informe se o primeiro é divisível pelo segundo.
 Visualg/ diagrama
Algoritmo "VERIFICAR SE O NUMERO E DIVISIVEL"
// Disciplina : Lógica de Programação]
// Professor : DANIEL BRANDÃO
// Descrição : Aqui você descreve o que o programa faz! (função)
// Autor(a) : Nome: FELICIA SOARES DO NASCIMENTO
// Data atual : 06/09/2019
Var
// Seção de Declarações das variáveis
num1,num2: REAL
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc...
 ESCREVAL (" DIGITE DOIS NUMEROS")
 LEIA (NUM1)
 LEIA (NUM2)
 se(NUM1 mod NUM2 =0) ENTAO
 ESCREVAL (NUM1, "DIVISIVEL POR" NUM2) 
 SENAO ESCREVAL (NUM1, "NAO DIVISIVEL",NUM2)
 FIMSE
 
Fimalgoritmo
6. Escreva um programa que leia dois números, em seguida calcule e informe qual é o maior número dentre estes, ou se estes são iguais.
Visualg 
ALGORITMO "VERIFICAR SE O NUMERO É MAIOR"
// DISCIPLINA : [LÓGICA DE PROGRAMAÇÃO]
// PROFESSOR : DANIEL BRANDÃO
// DESCRIÇÃO : AQUI VOCÊ DESCREVE O QUE O PROGRAMA FAZ! (FUNÇÃO)
// AUTOR(A) : FELICIA SOARES DO NASCIMENTO
// DATA ATUAL : 07/09/2019
VAR
// SEÇÃO DE DECLARAÇÕES DAS VARIÁVEIS
 N1,N2 :INTEIRO
 
INICIO
// SEÇÃO DE COMANDOS, PROCEDIMENTO, FUNÇÕES, OPERADORES, ETC...
 
 ESCREVAL ("DIGITE DOIS NUMERO")
LEIA (N1, N2);
SE (N1 < N2) ENTÃO
ESCREVAL ("O NÚMERO ”, N1, “ É O MENOR.");
SENÃO
SE (N2 < N1) ENTÃO
ESCREVA L("O NÚMERO ”, N2, “ É O MENOR.");
SENÃO
ESCREVAL ("OS NÚMEROS SÃO IGUAIS.');
FIMSE
FIMSE
 
Fimalgoritmo
7. Escreva um programa que leia os valores para as três notas de uma disciplina, em seguida calcule e informe a média obtida pelo aluno, e se este foi aprovado (média maior igual à 7,0), foi reprovado (média menor que 4,0) ou se este que está habilitado para fazer a prova final (média entre 4,0 e 6,9) .
Visualg 
ALGORITMO "MEDIA DO ALUNO"
// DISCIPLINA : [ LÓGICA DE PROGRAMAÇÃO]
// PROFESSOR : DANIEL BRANDÃO
// DESCRIÇÃO : AQUI VOCÊ DESCREVE O QUE O PROGRAMA FAZ! (FUNÇÃO)
// AUTOR(A) : NOME: FELICIA SOARES DO NASCIMENTO
// DATA ATUAL : 06/09/2019
VAR
// SEÇÃO DE DECLARAÇÕES DAS VARIÁVEIS
NOTA1, NOTA2, NOTA3, NOTA4, MEDIA : REAL
 
INICIO
// SEÇÃO DE COMANDOS, PROCEDIMENTO, FUNÇÕES, OPERADORES, ETC...
 
ESCREVA("DIGITE A PRIMEIRA NOTA: ") 
LEIA(NOTA1) 
ESCREVA("DIGITE A SEGUNDA NOTA: ") 
LEIA(NOTA2) 
ESCREVA("DIGITE A TECEIRA NOTA: ") 
LEIA(NOTA3) 
ESCREVA("DIGITE A QUARTA NOTA: ") 
LEIA(NOTA4) 
MEDIA := (NOTA1 + NOTA2 + NOTA3 + NOTA4) / 4 ;
SE MEDIA <= 4 ENTAO
 ESCREVA("A MEDIA DO ALUNO FOI: ", MEDIA)
 ESCREVAL (" - ALUNO REPROVADO ")
FIMSE
SE MEDIA <= 6.9 ENTAO
 ESCREVA("A MEDIA DO ALUNO FOI: ", MEDIA)
 ESCREVAL (" - ALUNO DE RECUPERAÇÃO ")
FIMSE
SE MEDIA >= 7 ENTAO 
 ESCREVA("A MEDIA DO ALUNO FOI: ", MEDIA)
 ESCREVAL (" - ALUNO APROVADO ")
FIMSE
 
Fimalgoritmo
8. Uma empresa decide dar um aumento de 30% aos funcionários com salários inferiores a R$ 900,00. Escreva um programa que receba o salário do funcionário e mostre o valor do salário reajustado ou uma mensagem caso o funcionário não tenha direito ao aumento.
Pseudocódigo:
VAR 
SALÁRIO, SALÁRIO REAJUSTADO : INTEIRO 
INÍCIO
REAL: SALARIO, SALARIO_REAJUSTADO; 
INÍCIO 
LEIA (SALARIO);
SE (SALARIO <900) ENTÃO
INÍCIO
SALARIO_REAJUSTADO ← SALARIO + (SALARIO * 0,3);
ESCREVA (“SALÁRIO REAJUSTADO: ”, SALARIO_REAJUSTADO); 
SENÃO
ESCREVA (“VOCÊ NÃO TEM DIREITO AO AUMENTO.”);
FIMSE; 
 FIMALGORITMO
9. Escreva um programa que leia um caractere, em seguida informe se este é uma vogal ou é uma consoante.
Visualg 
//ALGORITMO: "VOGAL OU CONSOANTE"
// DISCIPLINA : [ LÓGICA DE PROGRAMAÇÃO]
// PROFESSOR : DANIEL BRANDÃO
// DESCRIÇÃO : AQUI VOCÊ DESCREVE O QUE O PROGRAMA FAZ! (FUNÇÃO)
// AUTOR(A) : FELICIA SOARES DO NASCIMENT
// DATA ATUAL : 07/09/2019
VAR
// SEÇÃO DE DECLARAÇÕES DAS VARIÁVEIS
LETRA: CARACTERE
 
INICIO
// SEÇÃO DE COMANDOS, PROCEDIMENTO, FUNÇÕES, OPERADORES, ETC...
 ESCREVAL ("DIGITE UMA LETRA DO ALFABETO:")
 LEIA (LETRA)
 ESCOLHA (LETRA)
CASO "A", "E" ,"I", "O", "U"
 
 ESCREVAL(LETRA," -VOGAL")
 OUTROCASO
 ESCREVAL (LETRA," -CONSOANTE")
 FIMESCOLHA
 
FIMALGORITMO
10. Escreva um programa que leia um número equivalente ao mês, em seguida informe por escrito qual mês o usuário informou (Ex: o usuário informa 1, o programa exibe “Janeiro”)
.INICIO ALGORITMO;
 VAR M
('DIGITE UM NÚMERO:');
 
 SE VALOR == 1 ENTÃO
 EXIBIR('JANEIRO');
 FIM SE;
 
 SE VALOR == 2 ENTÃO
 EXIBIR('FEVEREIRO');
 FIM SE;
 
 (...)
 
 SE VALOR == 12 ENTÃO
 EXIBIR('DEZEMBRO');
 FIMSE
 
 SE (VALOR < 1) OU (VALOR > 12) ENTÃO
 EXIBIR('VALOR INVÁLIDO OU NÃO É UM NÚMERO!');
 FIMSE
FIMALGORITIMO
11. Escreva um programa que leia um número equivalente ao dia da semana, em seguida informe a qual dia da semana este corresponde (Ex: o usuário informa 1, o programa exibe “Domingo”).
Dias de Semana em Visualg: 
ALGORITMO "SEMNOME"
// FUNÇÃO :
// AUTOR :
// DATA : 19-04-2015
// SEÇÃO DE DECLARAÇÕES 
VAR DIA: INTEIRO
INICIO
ESCREVA("INSIRA UM NÚMERO DE 1 A 7 PARA VER O DIA DE SEMANA: ")
LEIA(DIA)
SE DIA=1 ENTAO
 ESCREVA("DOMINGO")
SENAO
 SE DIA=2 ENTAO
 ESCREVA("SEGUNDA-FEIRA")
 SENAO
 SE DIA=3 ENTAO
 ESCREVA("TERÇA-FEIRA")
 SENAO
 SE DIA=4 ENTAO
 ESCREVA("QUARTA-FEIRA")
 SENAO
 SE DIA=5 ENTAO
 ESCREVA("QUINTA-FEIRA")
 SENAO
 SE DIA=6 ENTAO
 ESCREVA("SEXTA-FEIRA")
 SENAO
 SE DIA=7 ENTAO
 ESCREVA("SÁBADO")
 SENAO
 ESCREVA("NÃO HÁ DIA DE SEMANA CORRESPONDENTE!...")
 FIMSE
 FIMSE
 FIMSE
 FIMSE
 FIMSE
 FIMSE
FIMSE
FIMALGORITMO
12. Uma clínica de nutrição necessita de um programa que realize o cálculo do IMC (índice de massa corpórea) dos seus pacientes. Escreva um programa que leia o nome, a alturae o peso de um paciente, em seguida, calcule e exiba o seu respectivo IMC. O IMC pode ser calculado pela fórmula 𝐼𝑀𝐶 = 𝑝𝑒𝑠𝑜/𝑎𝑙𝑡𝑢𝑟𝑎2. Ao final do algoritmo, informe a classificação da obesidade do paciente de acordo com a tabela abaixo:
Pseudocódigo 
VAR
 PESO, ALTURA , IMC : REAL
 NOME: CARACTERE
 ESCREVAL (“DIGITE UM NOME”)
LEIA( NOME)
 ESCREVAL ("DIGITE O SEU PESO”)
 LEIA (PESO)
 ESCREVAL ("DIGITE A SUA ALTURA")
 LEIA (ALTURA)
 
 
IMC = P / (A*A);
 SE ( IMC < 18) ENTÃO 
ESCREVAL (“ MAGREZA”)
SENÃO 
SE (IMC >18 <25) ENTÃO 
 ESCREVAL ("O SEU ÍNDICE É NORMAL” )
 SENÃO 
 SE (IMC >=26<30) ENTÃO 
ESCREVAL (“ESTA COM SOBREPESO”)
 SENÃO 
SE (IMC >=31<35) ENTÃO 
ESCREVAL ("SEU ÍNDICE É OBESIDADE GRAU 1 ”)
SENÃO
 SE (IMC >=36<40) ENTÃO 
ESCREVAL ("SEU ÍNDICE É OBESIDADE GRAU 2”)
SENÃO 
 SE (IMC> 40) ENTÃO 
ESCREVAL (VOCÊ ESTA COM OBESIDADE MÓRBIDA”)
FIMSE 
FIMSE 
FIMSE
FIMSE
FIMSE
FIMALGORITIMO