Resposta:Bacharelado em Ciência e Tecnologia BC-0505 Processamento da Informação Lista de Exercícios Nº 01 Algoritmos Estruturas Sequenciais RESOLUÇÃO em PORTUGOL ATENÇÃO- Para cada um dos exercícios abaixo, antes de escrever o algoritmo, identifique ENTRADA, PROCESSAMENTO e SAÍDA, utilizando a seguinte técnica de interpretação de enunciado: 1. Leia um número inteiro e escreva seu sucessor e antecessor. Sucessor e antecessor de um número inteiro. Um número inteiro (Z). Sucessor=Z+1 Antecessor=Z-1 inteiro z, ant, suc escreva ("Digite um número inteiro.\n") leia (z) ant = z - 1 suc = z + 1 escreva ("Antecessor: " + ant) escreva ("\nsucessor: " + suc) 2. Leia dois números e escreva o dividendo, divisor, quociente e resto. O dividendo, divisor, quociente e resto entre dois números. Dois números (n1 e n2).

2 Dividendo = n1 Divisor = n2 Quociente = n1/n2 Resto = n1 (n2*quociente) inteiro n1, n2, divid, divis, quoc, resto escreva ("Digite o primeiro número inteiro.\n") leia (n1) escreva ("Digite o segundo número inteiro.\n") leia (n2) divid = n1 divis = n2 quoc = n1 / n2 resto = n1 % n2 escreva ("Dividendo: " + divid + "\ndivisor: " + divid + "\nquociente: " + quoc + "\nresto: " + resto) 3. Calcule a dívida do cheque especial ao ser quitada 6 meses depois a uma taxa de 5% de juros. O valor do empréstimo deve ser informado. O valor da dívida do cheque especial a ser quitada. O valor do empréstimo (N). Fórmula de juros compostos: D=N(1+0.05)^6 inclua biblioteca Matematica --> mat real N, D

3 escreva ("Digite o valor do empréstimo: \n") leia (N) (Fórmula de Juros Compostos) D = N * (mat.potencia(( ),6.0)) escreva ("Valor da dívida: " + D) 4. Dada a base e a altura de um retângulo, calcule o perímetro, a área e a diagonal. O perímetro, a área e a diagonal do retângulo. Base e altura de um retângulo Perímetro = (2*altura) + (2*base) Área = altura*base Diagonal = sqrt((base*base) + (altura*altura)) inclua biblioteca Matematica -> mat real base, alt, per, area, diag escreva ("Informe o valor da base do retângulo: \n") leia (base) escreva ("Informe o valor da altura do retângulo: \n") leia (alt) per = (2*alt) + (2*base); area = alt*base; diag = mat.raiz((base*base) + (alt*alt)); escreval ("O perímetro do retângulo é: + per) escreval ("A área do retângulo é: + area) escreval ("A diagonal do retângulo é: + diag) 5. Dada o lado de um quadrado, calcule o perímetro, a área e a diagonal.

4 O perímetro, a área e a diagonal de um quadrado. O lado (L) do quadrado. Perímetro= Lx4 Área= L^2 Diagonal= sqrt(2)xl inclua biblioteca Matematica --> mat real L, P, A, D escreva ("Informe o valor do lado do quadrado: \n") leia (L) P=L*4; A=L*L; D=L*(mat.raiz(2.0,2.0)); escreval ("O perímetro do quadrado é: + P) escreval ("A área do quadrado é: + A) escreval ("A diagonal do quadrado é: + D) 6. Dado o raio de um círculo, calcule o perímetro e a área. O perímetro e a área de um círculo. Raio de um círculo (R). Perímetro = (2*π*R) Área = (π*r*r) real R, área, per

5 escreva ("Informe o valor do raio do círculo: \n") leia (R) per = (2*3,14*R); area = 3,14*(R*R); escreval ("O perímetro do círculo é: + per) escreval ("A área do círculo é: + area) 7. Dados os três lados de um paralelepípedo, calcule o perímetro, a área, o volume e a diagonal. Perímetro, área, volume e diagonal de um paralelepípedo. Os três lados de um paralelepípedo (A, B, C). Perímetro= 4*(A+B+C) Área= 2(AB+BC+CA) Volume= A*B*C Diagonal= sqrt(a^2+b^2+c^2) inclua biblioteca Matematica --> mat real ladoa, ladob, ladoc, perimetro, area, volume, diagonal escreva("entre com o primeiro lado do paralelepípedo: ") leia(ladoa) escreva("entre com o segundo lado do paralelepípedo: ") leia(ladob) escreva("entre com o terceiro lado do paralelepípedo: ") leia(ladoc) perimetro = 4*(ladoA + ladob + ladoc) area = 2*(ladoA*ladoB + ladob*ladoc + ladoc*ladoa) volume = ladoa * ladob * ladoc diagonal = mat.raiz (ladoa*ladoa + ladob*ladob + ladoc*ladoc, 2.0) escreva("\nperímetro: ",perimetro,"\nárea: ",area,"\nvolume: ",volume,"\ndiagonal: ",diagonal)

6 8. Dados dois catetos de um triangulo retângulo, calcule a hipotenusa. A hipotenusa de um triângulo retângulo. Dois catetos do triângulo retângulo. (cat1, cat2) Hipotenusa = sqrt ((cat1*cat1) + (cat2*cat2)) inclua biblioteca Matematica --> mat real cat1, cat2, hip escreva("informe o valor de um cateto do triângulo retângulo: ") leia(cat1) escreva("informe o valor do outro cateto do triângulo retângulo: ") leia(cat2) hip = mat.raiz((cat1*cat1) + (cat2*cat2),2) escreva("\n A hipotenusa do triângulo retângulo é ", hip) 9. Dada a razão de uma PA e seu primeiro termo, calcular o 20º termo. O 20º termo de uma PA. A razão e o primeiro termo de uma PA. Fórmula do termo geral de uma PA: An=A1+(n-1)*r, onde n=20.

Explicação: