Vktcs18

Boa Noite galera estou com dificuldade para finalizar meu código e preciso de uma ajuda pois iniciei hoje no visualG. Preciso que imprima se a pessoa é ADULTO MASCULINO ou MENOR FEMININO. SEGUE O CODIGO... Algoritmo "ID" Var nome, sexo, M, F: caractere resultado: real idade: inteiro maiordeidade: REAL menordeidade: real Inicio maiordeidade:=18 menordeidade:=17 escreva("Insira o nome: ") leia(nome) escreva("Insira a idade: ") leia(idade) se idade<18 entao escreval ("menor de idade") senao escreval ("maior de idade") FIMSE escreval("Sexo - Escreva M para masculino e F para feminino") leia(sexo) ESCOLHA sexo CASO "M" e "=18" ENTAO escreval ("Homem maior de idade") CASO "F" e "menordeidade" ENTAO escreval ("Mulher menor de idade") FIMESCOLHA FIMALGORITMO A dificuldade está em como juntar a informação do sexo com a idade do individuo. Lembrando que estou iniciando, beleza? Valeuu Um algoritmo que imprima nome, idade e o sexo, e imprima se a pessoa é adulta masculina ou menor feminina.

#include<stdio.h> #include<string.h> #include<stdlib.h> #include<locale.h> #define MAX 200 typedef struct infor{ int codigo; int opc; char titulo[30]; char descricao[50]; char ano[10]; char status[20]; char gerenteresponsavel[50]; }modprojetos; int local = 0; void cadprojeto(modprojetos cadastro[MAX]); void relatprojeto(modprojetos cadastro[MAX]); void porcodigo(modprojetos cadastro[MAX]); void portitulo(modprojetos cadastro[MAX]); int main(){ setlocale(LC_ALL, "Portuguese"); modprojetos cadastro[MAX]; int opcao; system("cls"); do{ system("cls"); printf("########################"); printf("\n# CONTROLE DE PROJETOS #"); printf("\n########################"); printf("\n 1 - Cadastrar"); printf("\n 2 - Imprimir"); printf("\n 3 - Pesquisa por Código"); printf("\n 4 - Pesquisa por Título"); printf("\n 5 - Sair"); printf("\n <<< Selecione uma opção do menu: "); scanf("%d", &opcao); switch(opcao){ case 1: cadprojeto(cadastro); break; case 2: relatprojeto(cadastro); break; case 3: porcodigo(cadastro); break; case 4: portitulo(cadastro); break; case 5: printf("\nSaindo...\n"); system("Pause"); break; default: printf("\nOpção invalida!\n"); system("Pause"); } }while(opcao != 5); return 0; } void cadprojeto (modprojetos cadastro[MAX]){ system("cls"); printf("=================="); printf("\n|| CADASTRO ||"); printf("\n=================="); char op = 's'; while(op == 's' && local <= MAX){ local++; printf("\nCódigo: %d ", local); //scanf("%d", &cadastro[local].codigo); cadastro[local].codigo = local; printf("\nInforme o Título: "); fflush(stdin); gets(cadastro[local].titulo); printf("\nInforme a descrição: "); fflush(stdin); gets(cadastro[local].descricao); printf("\nInforme o ano: "); fflush(stdin); gets(cadastro[local].ano); printf("\nInforme o status: \n"); printf(" [1] A fazer [2]Fazendo [3]Concluído "); scanf("%c", opc); switch (opc) { case 1: printf("A Fazer"); break; case opc == 2; printf("Fazendo"); break; case opc == 3; printf("Concluído"); break; default printf("Opção inválida!"); } printf("\nInforme o Gerente Responsável: "); fflush(stdin); gets(cadastro[local].gerenteresponsavel); if(local < MAX){ printf("\n\nDeseja cadastrar novo Projeto? [s] Sim [n] Não: "); fflush(stdin); scanf("%c", &op); }else{ printf("\nSua base de Dados chegou ao limite!\n"); op = 'n'; } } } void relatprojeto(modprojetos cadastro[MAX]){ system("cls"); printf("*****"); printf("\n RELATORIO "); printf("\n*******\n"); int linha=1; if(local >= 1){ while(linha <= local){ printf("%d - %s\n", cadastro[linha].codigo, cadastro[linha].titulo); linha++; } }else{ printf("\nSem Registros Cadastrados\n"); } system("Pause"); } void porcodigo(modprojetos cadastro[MAX]){ system("cls"); int codigo, result; printf("*****"); printf("\n PESQUISA POR CÓDIGO "); printf("\n*******"); printf("\nDigite o código: "); scanf("%d", &codigo); result = 0; int j = 0; while((result == 0) && (j <= local)){ if(codigo == cadastro[j].codigo){ printf("\n%d - %s\n", cadastro[j].codigo, cadastro[j].titulo); result = 1; system("Pause"); } j++; } if(result == 0 ){ printf("\nRegistro não encontrado com o código %d \n", codigo); system("Pause"); } } void portitulo(modprojetos cadastro[MAX]){ system("cls"); char titulo[30]; int result, j; printf("*****"); printf("\n BUSCA POR TÍTULO "); printf("\n*******"); printf("\nEntre com o titulo (igual ao digitado): "); fflush(stdin); gets(titulo); result = 0; j = 0; while((result == 0) && (j < MAX)){ if(strcmp(cadastro[j].titulo,titulo)==0){ printf("\n%d - %s\n", cadastro[j].codigo, cadastro[j].titulo); result = 1; system("Pause"); } j++; } if(result == 0 ){ printf("\nRegistro não encontrado com o titulo %s \n", titulo); system("Pause"); } } Boa noite, Estou finalizando meu código porém preciso de rodar no devc++ mas o PC que estou é Linux e preciso saber se está rodando no devc++. Usei o replit mas não é a mesma coisa. Se possível veja se essa parte para selecionar o status do projeto está rodando... printf("\nInforme o status: \n"); printf(" [1] A fazer [2]Fazendo [3]Concluído "); scanf("%c", opc); switch (opc) { case 1: printf("A Fazer"); break; case opc == 2; printf("Fazendo"); break; case opc == 3; printf("Concluído"); break; default printf("Opção inválida!"); } Desde já agradeço a ajuda !

#include<stdio.h> #include<locale.h> #include<string.h> #include<stdlib.h> #define MAX 200 struct projeto{ int codigo; char titulo[30]; char descricao[50]; char ano[10]; char status[20]; char gerenteresponsavel[50]; }; struct projeto projetos[MAX]; int main(){ setlocale(LC_ALL, "Portuguese"); char op = 's'; int i = 0; while(op == 's' && i < MAX){ projetos[i].codigo = i+1; printf("Informe o Titulo do projeto: "); fflush(stdin); gets(projetos[i].titulo); printf("Informe a descricao do projeto:"); fflush(stdin); gets(projetos[i].descricao); printf("Informe o ano do projeto:"); fflush(stdin); gets(projetos[i].ano); printf("Informe o Gerente Responsavel:"); fflush(stdin); gets(projetos[i].gerenteresponsavel); printf("Informe o Status do projeto:"); fflush(stdin); gets(projetos[i].status); printf("Cadastrar novo projeto? [s] Sim, [n] Não:"); fflush(stdin); scanf("%c", &op); if(op == 's') { if(i < MAX){ i++; }else{ printf("Atingiu o limite de cadastro"); system("pause"); op ='n'; } } } int n = 0; for(n = 0; n <= i; n++){ printf("\nCódigo: %d", projetos[n].codigo); printf("\nTítulo: %s", projetos[n].titulos); printf("\nDescrição: %s", projetos[n].descricao); printf("\nAno: %s", projetos[n].ano); printf("\nStatus: %s", projetos[n].status); printf("\nGerente Responsável pelo projeto: %s", projetos[n].gerenteresponsavel); } system("pause"); return 0; } Fala galera, estou com um erro no meu código onde não estou conseguindo identificar, olha o anexo ! Quem puder ajudar agradeço !!

Boa noite, Não estou conseguindo repetir a operação caso o usuário deseje nem limitar a quantidade de códigos no VisualG. Segue... procedimento cadastrarprodutos var i,codigo:inteiro op:caracter s,n: logico inicio s<-verdadeiro codigo<-1 para i de 1 ate 100 faca escreval("Informe o código do produto:(Código de 1 a 100)") leia(celular[i].codigo) se((codigo=0) ou (codigo>100)) entao escreva("ERRO") escreval("Quantidade máx. de produtos cadastrados") escreval(" ") senao escreval("Informe o modelo do produto") leia(celular[i].modelo) escreval("Informe a marca do produto") leia(celular[i].marca) escreval("Informe o preço do produto") leia(celular[i].preco) escreval("====================================") fimse escreval("Deseja repetir a operação? Digite s para Sim ou n para Não ") leia( op ) se op <> "s" entao s <- falso fimse

Consegui aqui, te agradeço.

Estou fazendo com procedimentos pelo VisualG e esta dando bom ate ai ta rodando no VisualG, mas quando tempo puxar o procedimento "cadastrar produtos" para caso 1 ele informa que não encontra a Variável caract_cell sendo que declarei ela como registro no inicio. Algoritmo "algo" tipo caract_cell = registro codigo:inteiro modelo:caracter marca:caracter preco:real fimRegistro var opcao:inteiro procedimento menu_principal inicio escreval("+++++++++++++++++++++++++++++++++++") escreval("+ 1 - Cadastrar produtos +") //informar para o usuário se o produto foi cadastrado ou não escreval("+ 2 - Todos os produtos +") escreval("+ 3 - Pesquisar um produto +") //informar ao usuário que o produto não foi encontrado caso ocorra. escreval("+ 4 - Sair +") escreval("+++++++++++++++++++++++++++++++++++") fimprocedimento procedimento cadastrarprodutos var i,codigo:inteiro inicio para i de 1 ate 100 faca escreval("Informe o código do produto") leia(caract_cell[i].codigo) escreval("Informe o modelo do produto") leia(caract_cell[i].modelo) escreval("Informe a marca do produto") leia(caract_cell[i].marca) escreval("Informe o preço do produto") leia(caract_cell[i].preco) fimpara fimProcedimento inicio repita menu_principal escreva("=====> ") leia(opcao) limpaTela escolha(opcao) caso 1 cadastrarprodutos caso 2 caso 3 caso 4 escreval("Obrigado pela preferência") outrocaso escreval("*********Opção Inválida**********") fimEscolha ate opcao = 4 fimAlgoritmo Alguém tem alguma solução pra ajudar no codigo ?

.

@devair1010 Algoritmo “cadastroCelular” Tipo produto = registro codigo: inteiro nome: Vetor[1..30] de caractere quantidade: inteiro valor: real espcor: Vetor[1..30] de caractere esptela: real memoriarom: inteiro memoriaram: inteiro Fimregistro Var Lista_prod: Vetor [1..100] de produto I: inteiro acha: logico resp: vetor[1..3] de caractere Inicio para i de 1 ate 100 passo 1 faca Escreva(“Digite o código do produto “ ,i, “:”) Leia (lista_prod[i]. codigo) Escreva(“Insira o valor do produto “ ,i, “:”) Leia(lista_prod[i].valor) Escreva(“Digite o nome do produto “ ,i, “:”) Leia(lista_prod[i].nome) Escreva(“Digite a quantidade de produtos “ ,i, “:”) Leia(lista_prod[i].quantidade) Escreva(“Digite a cor do aparelho” , i, “:”) Leia(lista_prod[i].espcor) Escreva(“Digite o tamanho da tela do aparelho”, i, “:”) Leia(lista_prod[i].esptela) Escreva(“Digite a quantidade de memória ROM”, i, “:”) Leia(lista_prod[i].memoriarom) Escreva(“Digite a quantidade de memória RAM”, i, “:”) Leia(lista_prod[i].memoriaram) Fimpara resp <- “sim” Enquanto (resp = “sim”) faca Escreva(“Informe o código a ser pesquisado:”) Leia(lista_prod.codigo) i <- 1 acha <- falso Enquanto (i < = 100) e (acha= falso) faça Se (lista_prod[i].codigo = codigo) então acha <- verdadeiro Senão i <- i + 1 fim_se fim_enquanto Se (acha = verdadeiro) então Escreva(“O preço é:”, lista_prod[i].valor) Escreva(“O nome do produto é:”, lista_prod[i].nome) Escreva(“O estoque do produto está em:”, lista_prod[i].quantidade) Escreva(“A quantidade de memória RAM é:”, lista_prod[i].memoriaram) Escreva(“A quantidade de memória ROM é:”, lista_prod[i].memoriarom) Senão Escreva(“Não há produto com o código informado”) fim_se Escreva(“Deseja continuar a pesquisa?”) Leia(resp) fim_enquanto Fimalgoritmo Pode verificar se está correto ?

Desenvolver seu algoritmo em pseudocódigo e atender aos seguintes critérios: 1 – Estrutura de Registro para armazenar 100 aparelhos celulares 2 – Um menu que apresente os seguintes módulos (procedimentos / funções) 2.1 – Cadastrar Produtos 2.2 – Listar todos (Aqui liste 3 características armazenadas) 2.3 - Listar 1 produto específico (Aqui liste 3 características armazenadas) Considere as seguintes regras: 1 - Controlar o cadastro para que não haja códigos idênticos. 2 - Informar ao usuário se produto foi cadastro ou não. 3 - Informar ao usuário que o produto não foi encontrado caso ocorra.

Desenvolver seu algoritmo em pseudocódigo e atender aos seguintes critérios: 1 – Estrutura de Registro para armazenar 100 aparelhos celulares 2 – Um menu que apresente os seguintes módulos (procedimentos / funções) 2.1 – Cadastrar Produtos 2.2 – Listar todos (Aqui liste 3 características armazenadas) 2.3 - Listar 1 produto específico (Aqui liste 3 características armazenadas) Considere as seguintes regras: 1 - Controlar o cadastro para que não haja códigos idênticos. 2 - Informar ao usuário se produto foi cadastro ou não. 3 - Informar ao usuário que o produto não foi encontrado caso ocorra.

@devair1010 Entendi, vou dar um lida aqui, obrigado, ajudou bastante.

@devair1010 Estava tentando ainda aqui...Cheguei a fazer assim... Algoritmo "Salario_final" Var vsemana1,vsemana2,vsemana3,vsemana4,sfinal,rsemana,sfixo,comissao:real colaborador:caracter S,S1,N,i:inteiro Inicio S<-0 para i de 1 ate 10 passo 1 faca escreva("Informe o nome do colaborador:") leia(colaborador) escreval escreval("Informe o salário fixo do colaborador ",colaborador) leia(sfixo) escreval escreval("Vendas da 1ª semana do colaborador ",colaborador) leia(vsemana1) escreval escreval("Vendas da 2ª semana do colaborador ",colaborador) leia(vsemana2) escreval escreval("Vendas da 3ª semana do colaborador ",colaborador) leia(vsemana3) escreval escreval("Vendas da 4ª semana do colaborador ",colaborador) leia(vsemana4) escreval rsemana<-vsemana1+vsemana2+vsemana3+vsemana4 escreva("Nome do colaborador:",colaborador) escreval escreval("O total de vendas do mês é de:",rsemana) comissao<-rsemana*10/100 sfinal<-sfixo+comissao escreval("O Salário do colaborador para esse mês é de:",sfinal) leia(sfinal) escreva("Deseja repetir a operação? Digite S para Sim ou N para Não: " ) leia(S) S<-S+S1 Escreval Escreval fimpara fimalgoritmo Estou aprendendo man, aos poucos vou pegando, nesse que fiz não consegui parar caso fosse o N. Te agradeço a ajuda, vendo pareceu simples.

Galera estou com dificuldade para usar o "enquanto" para repetir a operação caso digite "S". Segue... Algoritmo "Salario_final" // // Var // Seção de Declarações das variáveis vsemana1,vsemana2,vsemana3,vsemana4,sfinal,rsemana,sfixo,comissao:real colaborador:caracter S,N:logico Inicio para S de 1 ate 10 passo 1 faca escreva("Informe o nome do colaborador:") leia(colaborador) escreval("Informe o salário fixo do colaborador ",colaborador) leia(sfixo) escreval("Vendas da 1ª semana do colaborador ",colaborador) leia(vsemana1) escreval("Vendas da 2ª semana do colaborador ",colaborador) leia(vsemana2) escreval("Vendas da 3ª semana do colaborador ",colaborador) leia(vsemana3) escreval("Vendas da 4ª semana do colaborador ",colaborador) leia(vsemana4) rsemana<-vsemana1+vsemana2+vsemana3+vsemana4 escreva("Nome do colaborador:",colaborador) escreval escreval("O total de vendas do mês é de:",rsemana) comissao<-rsemana*10/100 sfinal<-sfixo+comissao escreval("O Salário do colaborador para esse mês é de:",sfinal) leia(sfinal) escreva("Deseja repetir a operação? Digite S para Sim ou N para Não ") leia(S) .... Alguém ajuda?

Fala galera, Preciso fazer com que esse programa de um loop mas não estou conseguindo aplicar o "enquanto" podem me ajudar ?? A ideia é sem ele digitar S repete a operação, se não, finaliza. Segue................. Algoritmo "Salario_final" Var Seção de Declarações das variáveis vsemana1,vsemana2,vsemana3,vsemana4,sfinal,rsemana,sfixo,comissao:real colaborador:caracter S,N:logico Inicio para S de 1 ate 10 passo 1 faca escreva("Informe o nome do colaborador:") leia(colaborador) escreval("Informe o salário fixo do colaborador ",colaborador) leia(sfixo) escreval("Vendas da 1ª semana do colaborador ",colaborador) leia(vsemana1) escreval("Vendas da 2ª semana do colaborador ",colaborador) leia(vsemana2) escreval("Vendas da 3ª semana do colaborador ",colaborador) leia(vsemana3) escreval("Vendas da 4ª semana do colaborador ",colaborador) leia(vsemana4) rsemana<-vsemana1+vsemana2+vsemana3+vsemana4 escreva("Nome do colaborador:",colaborador) escreval escreval("O total de vendas do mês é de:",rsemana) comissao<-rsemana*10/100 sfinal<-sfixo+comissao escreval("O Salário do colaborador para esse mês é de:",sfinal) leia(sfinal) escreva("Deseja repetir a operação? Digite S para Sim ou N para Não ") leia(S) ??????? Quem souber me ajudar e explicar eu agradeço!