Fundamentos da Computação
Construa um programa que leia 10 números e armazene em um vetor A. Leia outros 10 números e armazene em um vetor B. Gere um terceiro vetor onde cada elemento seja a soma dos outros dois elementos. PORTUGOL
Algorimo SomaVeotres;
VAR
vetorA, vetorB: : vetor [1..10] de inteiro cont, betorC: inteiro;
Inicio cont1; Para cont de 1 até 10 faça inicio Escreva(' - Informe um número inteiro para A: '); Leia (vetorA[cont]); Escreva (' - Informe número inteiro para B: '); Leia (vetorB[cont]); vetorC := vetorA[cont] + vetorB[cont]; Escreva (' - A soma dos vetores A e B é: ',vetorC); fim-para; cont:= cont + 1; Fim-algoritmo.
PASCAL
Program SomaVetor;
VAR
vetorA, vetorB: array[1..10] of integer; cont, vetorC: integer; Begin cont:=1; For cont:= 1 to 10 do begin Writeln (' - Informe um número inteiro para A: '); Readln (vetorA[cont]); Writeln (' - Informe número inteiro para B: '); Readln (vetorB[cont]); vetorC := vetorA[cont] + vetorB[cont]; Writeln (' - A soma dos vetores A e B é: ',vetorC); end;
cont:= cont + 1; End.
FLUXOGRAMA
RASTREIO DE MEMÓRIA
A 1 2 3 4 5 6 7 8 9 10 B 11 12 13 14 15 16 17 18 19 20 C 12 14 16 18 20 22 24 26 28 30
RASTREIO DE TELA
- Informe um número inteiro para A: 1 - Informe um número inteiro para B: 11
- A soma dos vetores A e B é: 12
- Informe um número inteiro para A: 2 - Informe um número inteiro para B: 12
- A soma dos vetores A e B é: 14
- Informe um número inteiro para A: 3
- Informe um número inteiro para B: 13
- A soma dos vetores A e B é: 16
- Informe um número inteiro para A: 4 - Informe um número inteiro para B: 14
- A soma dos vetores A e B é: 18
- Informe um número inteiro para A: 5