pessoal tenho uma duvida de como fazer para controlar o ciclo do "for", desde já agradeço.
passo 1: o primeiro procedimento1 vai até chegar na sequencia 1 2 4 e exibe, chamar o segundo procedimento2.
passo2: o segundo procedimento2, vai até chegar na sequencia 1 4 e exibe,
passo3: chamar o primeiro procedimento1, que parou na sequencia 1 2 4, gerar a sequencia 1 2 5, 1 3 4 exibe, chamar o passo 2
passo2: chamar o segundo procedimento2, que parou na sequencia 1 4, gerar a sequencia 1 5, 2 3, 2 4 exibe ate teminar as sequencias.
algoritmo "semnome"
// Função :
// Autor :
// Data : 15/11/2022
// Seção de Declarações
var
vetA: vetor[1..3]de inteiro
vetB: vetor[1..2]de inteiro
procedimento procediment1
var
i,j,x,p1,p2,p3:inteiro
inicio
// Seção de Comandos
para i de 1 ate 5 faca
vetA[1]:= i
para j de i+1 ate 5 faca
vetA[2]:= j
para x de j+1 ate 5 faca
vetA[3]:= x
escreval(vetA[1],vetA[2],vetA[3])
fimpara
fimpara
fimpara
fimprocedimento
procedimento procediment2
var
i,j:inteiro
inicio
// Seção de Comandos
para i de 1 ate 5 faca
vetB[1]:= i
para j de i+1 ate 5 faca
vetB[2]:= j
escreval(vetB[1],vetB[2])
combinar1
fimpara
fimpara
fimprocedimento
Pergunta
Joelson Silva
pessoal tenho uma duvida de como fazer para controlar o ciclo do "for", desde já agradeço.
passo 1: o primeiro procedimento1 vai até chegar na sequencia 1 2 4 e exibe, chamar o segundo procedimento2.
passo2: o segundo procedimento2, vai até chegar na sequencia 1 4 e exibe,
passo3: chamar o primeiro procedimento1, que parou na sequencia 1 2 4, gerar a sequencia 1 2 5, 1 3 4 exibe, chamar o passo 2
passo2: chamar o segundo procedimento2, que parou na sequencia 1 4, gerar a sequencia 1 5, 2 3, 2 4 exibe ate teminar as sequencias.
algoritmo "semnome"
// Função :
// Autor :
// Data : 15/11/2022
// Seção de Declarações
var
vetA: vetor[1..3]de inteiro
vetB: vetor[1..2]de inteiro
procedimento procediment1
var
i,j,x,p1,p2,p3:inteiro
inicio
// Seção de Comandos
para i de 1 ate 5 faca
vetA[1]:= i
para j de i+1 ate 5 faca
vetA[2]:= j
para x de j+1 ate 5 faca
vetA[3]:= x
escreval(vetA[1],vetA[2],vetA[3])
fimpara
fimpara
fimpara
fimprocedimento
procedimento procediment2
var
i,j:inteiro
inicio
// Seção de Comandos
para i de 1 ate 5 faca
vetB[1]:= i
para j de i+1 ate 5 faca
vetB[2]:= j
escreval(vetB[1],vetB[2])
combinar1
fimpara
fimpara
fimprocedimento
inicio
combinar1
combinar
fimalgoritmo
Correção
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.