Question

2) Crie os vetores A, B e C do tipo inteiro e de 10 posições cada. Os valores de cada posição do vetor A e do
vetor B deverão ser informados pelo usuário. O vetor C deverá ser preenchido com a subtração do vetor A e
B, ou seja, o vetor C será a diferença de cada elemento de A e B.
Ex.: C[1] <- A[1]-B[1], C[2] <- A[2]-B[2], ..., C[i] <- A[i]-B[i].


3) Desenvolva um programa que solicita ao usuário que digite números inteiros. Quando o usuário digitar o
número 0 o programa deverá mostrar o maior e o menor valores digitados.

Answer 1

Acho que é isso:

var
a: vetor [0..9] de inteiro
b: vetor [0..9] de inteiro
c: vetor [0..9] de inteiro
fimVetor: logico
i, aux, menor, maior: inteiro

inicio

aux <- -1
enquanto aux <> 0 faca   
 se (fimVetor = falso) entao     
escreva("Digite o", (i+1) ,"º número do vetor A: ")   
senao         
escreva("Digite o", (i+1) ,"º número do vetor B: ")   
fimse   
leia(aux)       
se (fimVetor = falso) entao         
a[i] <- aux         
se (i = 9) entao             
i <- -1             
fimVetor <- verdadeiro         
fimse   
senao       
b[i] <- aux       
se (i = 9) entao         
interrompa       
fimse   
fimse       
i <- i + 1
fimenquanto

para i <- 0 ate 9 faca     
se (a[i] = 0) ou (b[i] = 0) entao       
c[i] <- -1     
senao         
c[i] <- a[i] - b[i]     
fimse
fimpara

maior <- a[0]
menor <- a[0]

para i <- 0 ate 9 faca     
se menor > a[i] entao       
se a[i] <> 0 entao           
menor <- a[i]       
fimse     
fimse          
se maior < a[i] entao       
maior <- a[i]     
fimse
fimpara

para i <- 0 ate 9 faca     
se menor > b[i] entao       
se b[i] <> 0 entao           
menor <- b[i]       
fimse     
fimse
     se maior < b[i] entao       
maior <- b[i]     
fimse
fimpara

para i <- 0 ate 9 faca     
      se menor > c[i] entao       
         se c[i] <> -1 entao           
            menor <- c[i]       
         fimse     
      fimse
      se maior < c[i] entao       
         maior <- c[i]     
      fimse
fimpara

escreval("Maior número:", maior)
escreval("Menor número:", menor)
fimalgoritmo