LTP - Atividade 2

Prévia do material em texto

FACULDADE REDENTOR 
CURSO: ENGENHARIA 
 
 
 
 
 
Giulia Marchi Canedo Pacheco - 2100384 
 
 
 
 
 
 
Atividade 2 
 
 
 
 
 
 
 
 
 
 
 
Paraíba do Sul 
2021 
Etapa 1 
Algoritmo "Lavar roupa" 
Var A : caracter; 
 
inicio 
Escreval ("Deseja lavar suas roupas? Digite S para Sim e N para Não") 
Leia (A) 
 
Se A = "S" então 
Escreval ("Pegar roupas sujas...") 
Escreval ("Separar as roupas brancas das coloridas...") 
Escreval ("Colocar sabão líquido no seu compartimento") 
Escreval ("Colocar amaciante0 no seu compartimento...") 
Escreval ("Adequar função para determinado tipo de roupa...") 
Escreval ("Ligar a máquina de lavar...") 
Escreval ("Retirar roupa depois do processo...") 
Escreval ("Estender roupa no varal...") 
Escreval ("Fim do processo de lavagem") 
FimSe 
 
Se A = "N" então 
Escreval ("Não será lavada roupa hoje") 
FimSe 
Fimalgoritmo 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
Etapa 2 
 
Algoritmo "Nota" 
 
Var A, B, C, D, I, F : Real; 
F <- 0 
 
Inicio 
Escreval ("Insira a 1° nota do aluno, N1") 
Leia (A) 
Escreval ("Insira a 2° nota do aluno, N2") 
Leia (B) 
Escreval ("Insira a 3° nota do aluno, N3") 
Leia (C) 
Escreval ("Insira a 4° nota do aluno, N4") 
Leia (D) 
 
I <- ((2*A + 3*B + 5*C)/10) 
 
Se I >= 7 Entao 
Escreval ("O aluno foi aprovado, Nota final: ", I) 
Fimse 
//ok 
 
Se (I < 7) e (A < D) e (A < C) e (A < B) Entao 
F <- ((3*D + 3*B + 4*C)/10) 
Fimse 
 
Se (I < 7) e (B < D) e (B < A) e (B < C) Entao 
F <- ((3*A + 3*D + 4*C)/10) 
Fimse 
 
Se (I < 7) e (C < D) e (C < B) e (C < A) Entao 
F <- ((3*A + 3*B + 4*D)/10) 
Fimse 
 
Se (I < 7) e (A < D) e (A < C) e (A = B) Entao 
F <- ((3*D + 3*B + 4*C)/10) 
Fimse 
 
Se (I < 7) e (B < D) e (B < A) e (B = C) Entao 
F <- ((3*A + 3*D + 4*C)/10) 
Fimse 
 
Se (I < 7) e (C < D) e (C < B) e (C = A) Entao 
F <- ((3*A + 3*B + 4*D)/10) 
Fimse 
 
Se (F >= 7) entao 
Escreval ("O aluno foi aprovado, Nota final: ", F) 
Fimse 
 
Se (I < 7) e (F < 7) então 
Escreval ("O aluno foi reprovado, Nota final: ", F) 
Fimse 
Fimalgoritmo 
 
 
 
 
 
 
 
 
Etapa 3 
algoritmo "Valor N" 
var N, R4, R5, V, V1 : inteiro 
 
inicio 
Escreval ("Insira um valor") 
Leia (N) 
 
Se (N MOD 4 = 0) e (N MOD 5 = 0) então 
Escreval ("O valor ", N, " é divisível por 4 e 5") 
Senao 
Escreval ("Valor não divisível por 4 e 5") 
Fimse 
 
fimalgoritmo