Luiz Paulo Escobar

@charles95 Mas é cabeçudo mesmo, função dentro de main, o cara deu o tempo ai pra te ajudar, e aposto que ele tem outros afazeres, no mínimo tu tem que agradecer (bontando esse código pra funcionar) seguir a experiencia que ele passou, pois ele já deu o trabalho de te passar mastigado e de graça coisa que seu professor não fez nem pagando (O que já é feito) hahaha

@Mauro Britivaldo

@Mauro Britivaldo Se eu falar que sei 1% sobre programação, estou mentindo, então vou acompanhar vocês que vai agregar ao meu conhecimento, se chegarem em uma conclusão

@arfneto Estava vendo umas aulas conceituais do meu professor engenheiro de software, ele cita que a cadeia de char é um ponteiro, tanto que no scanf tu não precisa referenciar ela com < , & >@Mauro Britivaldo "vetor em linguagem C é ponteiro" , foi isso q entendi.

@arfneto O jeito é usar a função mesmo, não vale a pena refazer a roda, mas saber como a roda foi feita. Obrigado mesmo.

@devair1010 Valeu! Entendi a parte do C++ ter a variavel string adicionado 2 minutos depois @Lucca Rodrigues Usei esse critério por conta da questão da facul que pediu, acho q foi pra gerar dúvidas mesmo. Eu sou um cara que não se conforma em ver gabarito, posso ficar mais de 5 horas no mesmo problema, mas não me conformo em me rebaixar em certo ponto, acredito que, o problema está ali pra ser resolvido, e depois tentar me perguntar o porque não dava certo. Valeu pela força. adicionado 4 minutos depois @Lucca Rodrigues bacana, seria tipo um Upcase() em pascal? tem como me mandar um exemplo n precisa nem ser um código inteiro adicionado 10 minutos depois ISso me ajudou muito cara, fez muito sentido pra mim, o computador se iniciou do verdadeiro ou falso, to certo? então se uma coisa é falsa e é = 0 a outra q é verdade não pode ser = 0 na mesma condição! to certo? @arfneto adicionado 17 minutos depois @arfneto Teria em C um comando igual ao Upcase em pascal? facilitaria em vez de

@Lucca Rodrigues É possível fazer o teste lógico de comparação de uma cadeia de char no while? Funciona : Não funciona: E mais uma dúvida: (Por que não funciona se eu troca o && por ||):

Código que funciona > #include <stdio.h> #include <stdlib.h> #include <locale.h> #include<string.h> int main() { setlocale(LC_ALL,"portuguese"); char nome_comodo[30]; float largura, comprimento, Areacomodo, Areatotal; printf("Digite o nome do comodo:"); scanf("%s", nome_comodo); while(strcmp(nome_comodo,"fim") != 0 && strcmp(nome_comodo,"FIM" ) != 0) { printf("Digite a largura do comodo: \n"); scanf("%f", &largura); printf("Digite o comprimento do comodo:\n"); scanf("%f", &comprimento); system("cls"); Areacomodo = largura * comprimento; Areatotal = Areatotal + Areacomodo; printf("Digite o nome do comodo... digite FIM para finalizar.\n"); scanf(" %s", nome_comodo); } system("cls"); printf("\n\nA area total da casa é %.2f\n\n", Areatotal); return(0); } Código que não funciona> #include <stdio.h> #include <stdlib.h> #include <locale.h> int main() { setlocale(LC_ALL,"portuguese"); char nome_comodo[30]; float largura, comprimento, Areacomodo, Areatotal; printf("Digite o nome do comodo:"); scanf("%s", nome_comodo); while((nome_comodo != "fim") || (nome_comodo != "FIM" )) { printf("Digite a largura do comodo: \n"); scanf("%f", &largura); printf("Digite o comprimento do comodo:\n"); scanf("%f", &comprimento); system("cls"); Areacomodo = largura * comprimento; Areatotal = Areatotal + Areacomodo; printf("Digite o nome do comodo... digite FIM para finalizar.\n"); scanf(" %s", nome_comodo); } system("cls"); printf("\n\nA area total da casa é %.2f\n\n", Areatotal); return(0); }

Eu estava tentando fazer essa questão em C Aí comecei assim e deu erro > #include <stdio.h> int main() { int n, i; float s; i = 1; printf("digite o N: \n"); scanf("%d", &n); do { s = s + 1/i; i++; // printf("kkkkkkkkjkjjj"); tentei até colocar um printf pra verificar se estava funcionando essa parte, mudei pra while{} e nd }while (i <= n); printf("\nO S é: %.2f ", s); return(0); } Depois disso peguei e troquei o s = s + 1/i; para s = s + um/i; onde <um> defini como constante inteira e deu errado também Acabei pegando e criando uma variavel um inteira e deu errado Só depois disso que fiz certo, criando uma variavel float de um, AI FUNCIONOU #include <stdio.h> int main() { int n, i; float s,um; i = 1; um = 1; printf("digite o N: \n"); scanf("%d", &n); do { s = s + um/i; i++; }while (i <= n); printf("\nO S é: %.2f ", s); return(0); } A questão é, não possivel atribuir um para um float a soma dele mesmo com um inteiro dividindo um inteiro?

Eu estava tentando explorar o GitHub, coisa que nunca fiz para tentar achar algum código avançado e me deparei com um cara, de 2017 que fez uns 3 projetos que achei interessante pro meu aprendizado, porém o primeiro projeto dele estava todo bagunçado, sem indentação nem nada, (lembrando que não sei nem os conceitos básico de C e vou aprender essa semana), quero quebrar a cabeça antes de aprender e depois que aprender voltar a esse código e tentar ler novamente, porém o código não funciona, queria a ajuda de alguém pra arrumar ele, e deixar de um jeito "aprendível e legível" Segue-> #include <stdio.h> #include <stdlib.h> void CadastroCliente(int qt ,struct CLIENTE x[]); void ConsultarCliente(int qt,struct CLIENTE x[]); void ImprimirFichas(int qt ,struct CLIENTE x[]); void QuantidadeExames(int qt,struct CLIENTE x[]); void QuantidadeSexo(int qt,struct CLIENTE x[] ); void ExameMamografia(int qt,struct CLIENTE x[] ); void ExamesMais(int qt,struct CLIENTE x[]); struct CLIENTE{ int cpf , idade,exame,sexo; char nome[20],sobre[20],nomeMedi[20]; //Um registro sobre a pessoa } main(){ int acao,escolha,cont =0, senha, qtd; struct CLIENTE cadCliente[99]; //não entendi printf(" ************************************************************\n B E M V I N D O A O C A D F A C I L \n ************************************************************\n\n\n"); printf(" 1.A C E S S O A O S I S T E M A .\n"); printf("\n\n "); scanf("%d",&acao); system("cls"); printf("\n\n\n\n\n\n\n\n\n Digite a senha de acesso:"); scanf("%d",&senha); system("cls"); while(senha!=102030){ printf("\n\n\n\n\n\n\n\n\n Senha incorreta!"); printf("\n\n\n\n\n Digite a senha de acesso:"); scanf("%d",&senha); system("cls"); cont++; } printf("\n\n\n\n\n\n\n\n\n\n\n Quantos clientes serao importados para o banco de dados?"); scanf("%d",&qtd); system("cls"); while(escolha!=8){ printf(" *********************************************************\n M E N U P R I N C I P A L \n *********************************************************\n\n\n"); printf("\n\n\n\n1.Cadastro do Cliente.\n\n2.Imprimir Fichas\n\n3.Consulta de cliente.\n\n4.Quantidade de Exames.\n\n5.Quantidade por sexo.\n\n6.Dados Mamografia.\n\n7.Exame mais realizado do dia.\n\n8.Sair do sistema.\n\n\n"); scanf("%d",&escolha); system("cls"); switch(escolha){ case 1: CadastroCliente(qtd,cadCliente); break; case 3: ConsultarCliente(qtd,cadCliente); break; case 2: ImprimirFichas(qtd,cadCliente); break; case 4: QuantidadeExames(qtd,cadCliente); break; case 5: QuantidadeSexo(qtd,cadCliente); break; case 6: ExameMamografia(qtd,cadCliente); break; case 7: ExamesMais(qtd,cadCliente); break; } cont++; } system("pause"); } void CadastroCliente(int qt, struct CLIENTE x[]){ int i; for(i = 1 ; i <=qt ; i++){ printf("\n\n\n\n\nDigite o nome do cliente:"); scanf(" %s",&x[i].nome); printf("\nDigite o sobrenome do cliente %s:",x[i].nome); scanf(" %s",&x[i].sobre); printf("\nDigite o sexo do cliente %s:\n1.Masculino\n2.Feminino",x[i].nome); scanf(" %d",&x[i].sexo); printf("\nDigite a idade do cliente %s:",x[i].nome); scanf("%d",&x[i].idade); printf("\nDigite o CPF do cliente %s:",x[i].nome); scanf("%d",&x[i].cpf); printf("\nExcolha o exame a ser feito:\n"); printf("-001: Raio x.\n\n-002: Mamografia.\n\n-003: Ultrassonografia.\n\n-004: Ressonancia.\n\n"); scanf("%d",&x[i].exame); printf("\nNome do medico:"); scanf(" %s",&x[i].nomeMedi); system("cls"); } } void ConsultarCliente(int qt,struct CLIENTE x[]){ int i , consul, cp, cont =0; while(consul !=1){ printf("\ninforme o cpf: "); scanf("%d",&cp); system("cls"); for(i = 1 ; i <=qt ; i++){ if(cp == x[i].cpf){ printf("Nome do cliente: %s.\n\n",x[i].nome); printf("Sobrenome do cliente: %s.\n\n",x[i].sobre); if(x[i].sexo == 1){ printf("Sexo do cliente: Masculino.\n\n"); } if(x[i].sexo == 2){ printf("Sexo do cliente: Feminino.\n\n"); } printf("CPF do cliente: %d.\n\n",x[i].cpf); printf("Idade do cliente: %d.\n\n",x[i].idade); if(x[i].exame == 001){ printf("Exame marcado: Raio-x.\n\n"); } if(x[i].exame == 002){ printf("Exame marcado: Mamografia.\n\n"); } if(x[i].exame == 003){ printf("Exame marcado: Ultrassonografia.\n\n"); } if(x[i].exame == 004){ printf("Exame marcado: Ressonancia.\n\n"); } printf("Nome do medico : %s\n\n",x[i].nomeMedi); } } printf("Ir para o menu? 1-Sim - 2-Nao."); scanf("%d",&consul); system("cls"); cont++; } } void ImprimirFichas(int qt,struct CLIENTE x[]){ int i,b,cont= 0; while(b!=1){ for(i = 1 ; i <=qt ; i++){ printf("\n\nCliente %d :\n\n\n",i); printf("Nome do cliente: %s.\n\n",x[i].nome); printf("Sobrenome do cliente: %s.\n\n",x[i].sobre); if(x[i].sexo == 1){ printf("Sexo do cliente: Masculino.\n\n"); } if(x[i].sexo == 2){ printf("Sexo do cliente: Feminino.\n\n"); } printf("CPF do cliente: %d.\n\n",x[i].cpf); printf("Idade do cliente: %d.\n\n",x[i].idade); if(x[i].exame == 001){ printf("Exame marcado: Raio-x.\n\n"); } if(x[i].exame == 002){ printf("Exame marcado: Mamografia.\n\n"); } if(x[i].exame == 003){ printf("Exame marcado: Ultrassonografia.\n\n"); } if(x[i].exame == 004){ printf("Exame marcado: Ressonancia.\n\n"); } printf("Nome do medico : %s\n\n",x[i].nomeMedi); } printf("Ir pro menu principal, 1.Sim \ 2.Nao ?"); scanf("%d",&b); system("cls"); cont++; } } void QuantidadeExames(int qt ,struct CLIENTE x[]){ int i,cont=0,cont2=0,cont3=0,cont4=0,contW=0,a; while(a!=1){ for(i = 1 ; i <=qt ; i++){ if(x[i].exame == 001){ cont++; } if(x[i].exame == 002){ cont2++; } if(x[i].exame == 003){ cont3++; } if(x[i].exame == 004){ cont4++; } } printf("\n\nQuantidade de Raio-x Realizados: %d.\n",cont); printf("\n\nQuantidade de Mamografia Realizados: %d.\n",cont2); printf("\n\nQuantidade de Ultrassonografia Realizados: %d.\n",cont3); printf("\n\nQuantidade de Ressonancia Realizados: %d.\n",cont4); printf("Ir para o menu? 1-Sim. - 2 - Nao."); scanf("%d",&a); system("cls"); contW++; } } void QuantidadeSexo(int qt,struct CLIENTE x[]){ int i,cont=0,cont2=0,a,contW=0; while(a!=1){ for(i = 1 ; i <=qt ; i++){ if(x[i].sexo == 1){ cont++; } if(x[i].sexo == 2){ cont2++; } } printf("\n\nQuantidade de Homens atendidos: %d.\n",cont); printf("\n\nQuantidade de Mulheres atendidas: %d.\n\n",cont2); printf("Ir para o menu? 1-Sim. - 2 - Nao."); scanf("%d",&a); system("cls"); contW++; } } void ExameMamografia(int qt,struct CLIENTE x[]){ int i , contW = 0,a; while(a!=1){ for(i = 1 ; i<=qt ; i++){ printf("\n\nCliente %d :\n\n\n",i); printf("Nome do cliente: %s.\n\n",x[i].nome); printf("Sobrenome do cliente: %s.\n\n",x[i].sobre); if(x[i].sexo == 1){ printf("Sexo do cliente: Masculino.\n\n"); } if(x[i].sexo == 2){ printf("Sexo do cliente: Feminino.\n\n"); } printf("CPF do cliente: %d.\n\n",x[i].cpf); printf("Idade do cliente: %d.\n\n",x[i].idade); if(x[i].exame == 001){ printf("Exame marcado: Raio-x.\n\n"); } if(x[i].exame == 002){ printf("Exame marcado: Mamografia.\n\n"); } if(x[i].exame == 003){ printf("Exame marcado: Ultrassonografia.\n\n"); } if(x[i].exame == 004){ printf("Exame marcado: Ressonancia.\n\n"); } printf("Nome do medico : %s\n\n",x[i].nomeMedi); } printf("Ir para o menu? 1-Sim. - 2 - Nao."); scanf("%d",&a); system("cls"); contW++; } } void ExamesMais(int qt,struct CLIENTE x[]){ int i,cont=0,cont2=0,cont3=0,cont4=0,a; while(a!=1){ if(x[i].exame == 001){ cont++; } if(x[i].exame == 002){ cont2++; } if(x[i].exame == 003){ cont3++; } if(x[i].exame == 004){ cont4++; } } if(cont>cont2 && cont > cont3 && cont >cont4){ printf("\n\nO Raio-x foi o mais realizado com %d exames.\n\n",cont); } if(cont2>cont && cont2 > cont3 && cont2 >cont4){ printf("\n\nA mamografia foi a mais realizada com %d exames.\n\n",cont2); } if(cont3>cont && cont3 > cont2 && cont3 >cont4){ printf("\n\nA Ultrassonografia foi a mais realizada com %d exames.\n\n",cont3); } if(cont4>cont && cont4 > cont2 && cont4 >cont3){ printf("\n\nA Ressonancia foi a mais realizada com %d exames.\n\n",cont4); } printf("Ir para o menu? 1-Sim. - 2 - Nao."); scanf("%d",&a); system("cls"); contW++; }

Olá, sou o Luiz, ignore o nick criativo haha, mas tenho uma dúvida sobre o aquecimento do meu celular(além de ser um celular gamer com resfriamento líquido). Eu jogo os jogos no ultra, no máximo, sempre, e ele esquenta muito, há alguma maneira ou configuração para ele não esquentar tanto? E também tenho uma dúvida sobre o modo desenvolvedor, tem alguma config lá para melhorar a performance "performasse" do celular em jogos? ou algo para a bateria ser mais durável?

@devair1010 Muito obrigado

De começo : O pseudocódigo é de sintaxe única da Faculdade. Eu desenvolvi um código respeitando os limites que a questão dá, preciso de alguém pra me ajudar no teste de mesa, pra mim está tudo OK, mas se tiver algo pra melhorar, vai ser de grande ajuda em conhecimento. Segue: Obs: eu estava pensando em colocar uma estrutura de repetição perguntado se quer jogar novamente. Obs: Questão logo abaixo do código(Longa) Algoritmo DoisouUm função Verificar(x:inteiro):inteiro Inicio Enquanto(x<>1) e (x<>2) faça Escreval("Digite novamente, pois só é perimitido 2 ou 1") leia(x) Fim_Enquanto Retorne x Fim_função Var A, C, P: inteiro Início Escreval("André digite 2 ou 1") leia(A) A <- Verificar(A) Escreval("Carlos digite 2 ou 1") leia(C) C <- Verificar(C) Escreval("Pietro digite 2 ou 1") leia(P) P <- Verificar(P) Se(A<>C) e (A<>P) então Escreval("A") Senão Se(C<>A) e (C<>P) então Escreval("C") Senão Se(P<>A) e (P<>C) então Escreva("P") Senão Escreval("X") Fim_se Fim_se Fim_se Fim Questão: A Sociedade Brasileira de Computação (SBC) promove, anualmente, a maratona de programação. Nesse evento, competidores de toda a América Latina competem em um desafio onde o raciocínio matemático e a capacidade de trabalhar sob pressão são avaliados a níveis extremos. Em uma de suas edições, a SBC incluiu um exercício que faz referência ao jogo “Dois ou Um” (também conhecido como “Dois ou Um”, em algumas localidades do país). O jogo funciona como descrito a seguir. “Cada jogador escolhe um valor entre dois ou um; ao som de um comando (geralmente um dos competidores anuncia em voz alta “Dois ou... Um! ”), todos os participantes mostram o valor escolhido, utilizando uma das mãos: se o valor escolhido foi um, o competidor mostra o dedo indicador estendido; se o valor escolhido foi dois, mostra a mão com exatos dois dedos estendidos. O ganhador é aquele que tiver escolhido um valor diferente de todos os outros; se não há um jogador com valor diferente de todos os outros (por exemplo todos os jogadores escolhem dois, ou um grupo de jogadores escolhe dois e outro grupo escolhe um), não há ganhador. ” André, Carlos e Pietro são grandes amigos e jogam Dois ou Um a toda hora: para determinar quem será o motorista da rodada, quem vai pagar a conta, etc. Jogam tanto que resolveram fazer um aplicativo de celular para jogar. Como não sabem programar, dividiram as tarefas entre amigos que sabem, inclusive você. Dados os três valores escolhidos por André, Carlos e Pietro, cada valor dois ou um, escreva um algoritmo que determina se há um ganhador, e nesse caso determina quem é o ganhador. O algoritmo deve receber como entrada, três valores inteiros que serão armazenados nas variáveis A, C e P indicando os valores escolhidos por André, Carlos e Pietro, respectivamente. O algoritmo deverá produzir uma única saída, imprimindo apenas um caractere. Se o vencedor for André, deve-se imprimir a letra “A”, na tela; se o vencedor for Carlos, é preciso mostrar o caractere “C”, na tela; se Pietro for o ganhador, então deve-se imprimir “P”; por fim, se não houver vencedor, deve-se imprimir um asterisco, “X”, na tela. Deve-se considerar que o usuário é leigo, e nem sempre irá digitar ou o número dois (2) ou o número um (1). É preciso que o algoritmo trate as entradas que não estiverem dentro do padrão de dois ou um, solicitando ao usuário que insira um novo valor, caso ele não insira um dado válido (número 2 ou número 1). Considere que o usuário tem acesso apenas ao teclado numérico, sendo impossível inserir caracteres alfabéticos, acentos ou qualquer outro dado diferente de números. Somente após validados os dados informados pelo usuário, o algoritmo deve apresentar o resultado e, consequentemente, quem foi vitorioso, de acordo com a seguinte tabela de exemplos de entradas e saídas:

@Visitante obrigado

Eu não consigo botar na minha cabeça isso, é meio complicado, pra mim, parece que não serve pra nada do jeito que o professor da faculdade ensinou...

Eu tenho um cursinho pendente que paguei 1,500 de programação Em Visual e Java, Sobrou java, estava indo todos os dias e as coisas não entravam na cabeça, ai desisti, mas ele continua lá, presencial e tudo mais. Aprendi a lógica e Pascal e Visual, E estou indo para C em Algoritmo e lógica de p II, será que dá pra aprender os dois tranquilo?

Posso perguntar pra ti por aqui qual grade curricular tu acha mais atraente?

@Simon Viegas Realmente era isso que eu queria saber, estou cursando finalmente a faculdade, uma vez participei do fórum a lógica de programação em Pascal, porém eu fazia várias outras coisas junto e não peguei bem essa parte de matriz, registros e sub-rotinas, agora estou pro, eu fiquei sem entrar no fórum dps de compartilhar essa dúvida e fiquei fazendo o teste de mesa com esse código, aí até que cheguei nessa lógica sua, finalmente, muito obrigado por responder, agora tenho certeza que minha lógica finalizou corretamente. Você sabe algum curso gratuito completo de C ou algum livro bom?

@devair1010 Se puder somente me dizer a interpretação disso, ou me mostrar um algoritmo que faço o que esse quer fazer em alguma linguagem , por favor *opa você ja tinha respondido e eu mandei sem querer* adicionado 5 minutos depois @devair1010 Então ela vai pegar e somar todos os números da matriz? Eu achava que o contador i e j iria correr juntos e soma seria feita no espaço de memória que os dois apontavam ao mesmo tempo ou seja mat[1,1] ou linha 1 e coluna 1, pegaria o numero que está nesse espaço e somaria com o do espaço linha 2 e coluna 2 e logo em seguida com a linha 3 e coluna 3.

@devair1010 É só um teste de mesa, não é compilar adicionado 1 minuto depois É tipo, vamos supor que está preenchido e vamos supor que ele vai fazer isso que está ai, ignore os erros, tanto q não se da um compilador no meu curso, eles querem tudo na mão e na compreensão, o Professor é Doutorado em Eng SF adicionado 4 minutos depois Eu só quero saber se o que ele vai fazer nesse trecho, porque está na apostila Para i de 1 a 3 passo 1 faça Para j de 1 a 3 passo 1 faça Soma<-Soma+mat[i,j] // em especial nessa parte eu quero saber como funciona Fim_para Fim_para

//Desenvolver um algoritmo que realize a soma dos //elementos da seguinte matriz. Considere que a //matriz já foi preenchida com valores, ou seja, já está //armazenada na memória, da seguinte forma: algoritmo SomadeMatriz var mat: Vetor[1..3, 1..3] de inteiro i, j, soma: inteiro início soma<-0 Para i de 1 a 3 passo 1 faça Para j de 1 a 3 passo 1 faça Soma<-Soma+mat[i,j] // em especial nessa parte eu quero saber como funciona Fim_para Fim_para Fim Supondo que o vetor bidimensional já está preenchido com os valores: | 2 5 6 | | 5 3 2 | | 2 5 1 | Obs: Pra mim a soma seria feita do 2+3+1, estou confuso e se puderem me mandar algo pra eu estudar e me aprofundar, agradeço, quero ser desenvolvedor de games e percebi que matrizes são ligadas a isso.

GotoXY(11, WhereY-2); readln(usuario.nome); GotoXY(11, WhereY ); readln(usuario.senha); Não entendi esses pontos, o que fazer? (ignorar), vi agora q ja explicou.

@Simon Viegas @KXSY Eu ja fiz um o programa para aparecer ali pra pessoa digitar algo, com cor e todas as funções, só queria saber se existe um jeito de quando a pessoa digitar um login e senha, o programa iria la no bloco txt e verificaria se o login e senha estaria corretor e voltaria para confirmar se estaria de acordo, se sim o programa iniciaria normalmente, se nao ele resetaria, quero acrescentar tipo uma função para cadastro, tipo um painel. sabe? vou postar meu código inteiro aqui: { Objetivo --> Usar tudo o que aprendi } //// //// //// Program Diaria ; Var i, V: integer; Login, Senha, BV, Crono: String; //// Procedure Cronometro; var hi,mi,si,csi,hh,mm,ss,cs:word; Begin ClrScr; hi:=0; mi:=0; si:=0; csi:=0; cs:=0; gettime(hi,mi,si,csi); TextColor(2); Lowvideo; //cronometro gotoxy(80,12); Write ('Hora atual:'); Repeat gettime(hh,mm,ss,cs); gotoxy(80,14); Write (hh,':',mm,':',ss,':',cs); until keypressed; gotoxy(48,16); Lowvideo; Write('Demorou, ',hh-hi,' Horas/ ',mm-mi,' minutos/ ',ss-si,' segundos/ ',cs-csi,' centésimos, para executar a tarefa!'); readkey; readln; End; Procedure Armazem; Var VetorArmazem : Array[1..100] of string; ValorFinal, i, numTarefa : integer; Continuar : String; Begin GotoXY(50,22); TextBackGround(10); TextColor(14); Write ('LUIZ, QUANTAS TAREFAS DESEJA ARMAZENAR HOJE ? (1,2,3,4...) '); TextBackground(White); Textcolor(LightBlue); Write ('-->'); TextBackGround(Black); Write(' '); Readln(ValorFinal); For i:= 1 to ValorFinal do Begin Clrscr; GotoXY(66,22); Write ('Digite a - ',i,' - tarefa: '); Readln(VetorArmazem[i]); Clrscr; Repeat GotoXY(62,24); Write ('QUAL TAREFA DESEJA CONSULTAR ? (1,2,3,4...) '); Readln(numTarefa); GotoXY(68,26); TextBackGround(14); TextColor(LightRed); Writeln ('A TAREFA A FAZER É ->> ', VetorArmazem[numTarefa],' <<- '); TextBackGround(Black); GotoXY(50,30); Write ('Deseja Iniciar a contagem de tempo para fazer essa tarefa ? (SIM/NAO) '); Readln(Crono); If (Upcase(Crono)) = 'SIM' then Begin Cronometro; end; //Armazenagem TextColor(14); GotoXY(68,28); Write ('Deseja continuar ? (SIM/NAO) -> '); Readln(Continuar); Clrscr; Until (Upcase(Continuar)) = 'NAO'; end; End; //// Begin //Login and senha GotoXY(74,3); BV:= 'BEM VINDO LUIZ !!! :D '; TextBackground(Black); For i:= 1 to Length(BV)do Begin TextColor(Blink + 12); Write (BV[i]); Delay(50); end; // termina o Welcome While V <> 1 do Begin Textbackground(black); GotoXY(3,6); TextBackGround(1); TextColor(blink+Red); lowvideo; Write ('|||||||||||||||||||||| Digite seu Login: '); TextColor(White); TextBackGround(Black); Write(' '); TextBackGround(4); Write (' >>> '); TextBackGround(Black); TextColor(2); Write(' '); TextColor(Red); Read (Login); TextBackGround(Black); If (Upcase(Login)) = 'ANONYMOUSLPH' then Begin GotoXY (70,6); TextBackGRound(BLUE); TextColor(LightGreen); Write (' V '); V:= 1; GotoXY(55,11); TextColor(Green); Writeln('Login Correto!!! '); end Else Begin GotoXY (70,6); TextBackGround(BLUE); TextColor(LightRed); Write (' X '); V:= 2; GotoXY(55,11); TextColor(RED); Writeln('Login incorreto!!!'); end; GotoXY(3,8); TextBackGround(1); TextColor(blink+Red); lowvideo; Write ('||||||||||||||||||||| Digite sua Senha: '); TextColor(White); TextBackGround(Black); Write(' '); TextBackGround(4); Write (' >>> '); TextBackGround(Black); TextColor(2); Write(' '); TextColor(Red); Readln(Senha); TextBackGround(Black); If (Upcase(Senha)) = '9637ZX' then Begin GotoXY (70,8); TextBackGRound(BLUE); TextColor(LightGreen); Write (' V '); V:= 1; GotoXY(55,10); TextColor(Green); Writeln('Senha correta!!!'); end Else Begin GotoXY (70,8); TextBackGround(BLUE); TextColor(LightRed); Write (' X '); V:=2; GotoXY(55,10); TextColor(RED); Writeln('Senha incorreta!!!'); end; If V <> 1 then Begin TextBackGround(Black); end; Writeln; TextColor(Red+Blink); GotoXY(20,12); TextBackGround(LightRed); Textcolor(White+Blink); Writeln('---Press Enter---'); TextBackGround(Black); Readkey; Clrscr; end; Case V of 1: Begin Armazem; end else Begin V:= 99; end; End; End. Estou quebrando a cabeça com isso... kkkk :c adicionado 5 minutos depois Comandos que desconheço (IoResult, readln(usuario.nome), Reset)

ok

@Simon Viegas Entendi perfeitamente a parte do parâmetro, mas, n entendi a parte das UNIT, fui lá, dei uma lhada e n entendi aquele USES CRT, {biblioteca com comandos extas} CRT_FCH;, pois não funcionou no meu pzim 6.0