roogeraraujo

Bem estou fazendo um exercecio onde preciso conectar a rede A com a rede B, a rede A possui a faixa de ip 10.X.X.X e a rede b 177.X.X.X. Seque em anexo o esquema que ja fiz. Por meio de um (ou mais) roteador(s) tenho que conectar as duas redes, e poder acessar o site vinculado ao dns de cada servidor. Ex.: Pela rede A, acessar o dns do servidor da rede B. Poderiam me ajudar?

@devair1010 cara nem sei o que dizer, muito obrigado! Ficou otimo. Agradeço!

Preciso fazer um programa de acordo com a questão! "Escreva um programa que leia dois vetores A e B de 5 números inteiros e calcule um terceiro vetor que contenha todos os elementos que estão presentes no vetor A mas que não estão presentes no vetor B. O terceiro vetor não deverá armazenar valores repetidos." Program Pzim; Uses crt; Const ORDEM=5; Type vetor=array[1.. ORDEM] of integer; Var vet1, vet2, vet3: vetor; k, j, l, cont: integer; repeated: boolean; Procedure leVetor(var vet: vetor); Var k: integer; Begin for k:=1 to ORDEM do Begin write('Digite o valor do vetor de posição ',k,': '); readln(vet[k]); End; End; Procedure imprimirVetor(var vet: vetor; cont: integer); Var k: integer; Begin writeln; for k:=1 to cont do write(vet[k],' '); End; Begin textColor(yellow); writeln('Lendo o primeiro vetor: '); textColor(white); leVetor(vet1); textColor(yellow); writeln('Lendo o segundo vetor: '); textColor(white); leVetor(vet2); cont:=0; for k:=1 to ORDEM do begin for j:=1 to ORDEM do begin if vet1[k]=vet2[j] then begin repeated:=false; for l:=1 to ORDEM do begin if vet1[k]=vet3[l] then repeated:= true; end; if repeated=false then begin cont:= cont+1; vet3[cont]:=vet1[k]; end; end; end; end; textColor(3); writeln('O vetor resultante é: '); imprimirVetor(vet3, cont); readln; End. Poderiam me ajudar, de porque não esta dando certo!