ronald1087xd
Membro Pleno-
Posts
20 -
Cadastrado em
-
Última visita
Reputação
1-
Estou com problema no calculo, eu digito o numero binário mas ele não converte, o que eu faço???. Eu o uso o compilador "NetBeans" //ESTE É O MAIN DO PROGRAMA package calculadora_binaria; import java.util.ArrayList; import java.util.Scanner; public class Calculadora_Binaria { public static void main(String[] args) { Scanner ler = new Scanner(System.in); int decimal; char opcao; ArrayList<Decimal> dec = new ArrayList(); do{ System.out.println("-------------------------------------------------"); System.out.println("| B - PARA CONVERTER NUMEROS BINARIOS |"); System.out.println("| D - PARA CONVERTER NUMEROS DECIMIAS |"); System.out.println("| H - PARA CONVERTER NUMEROS HEXADECIMAIS |"); System.out.println("| X - PARA SAIR |"); System.out.println("-------------------------------------------------"); System.out.print("DIGITE UMA OPCAO: "); opcao = ler.next().toUpperCase().charAt(0); switch (opcao){ case 'B': System.out.println("Digite um numero Binário: "); decimal = ler.nextInt(); Decimal d = new Decimal(decimal, decimal, decimal); dec.add(d); System.out.println(decimal + " em binário é: "); for(int i = 0; i < dec.size(); i++){ System.out.println(dec.get(i).getDecimal()); } break; } }while (opcao != 'X'); } } //ESTA É A CLASSE package calculadora_binaria; import java.util.Arrays; public class Binario { private int binario; public Binario(int binario) { this.binario = binario; } public int getBinario() { return binario; } public void setBinario(int binario) { this.binario = binario; } public void exibir(){ System.out.println(binario); } } //ESTA É OUTRA CLASSE package calculadora_binaria; public class Decimal extends Binario{ private int potencia; private int decimal; public Decimal(int potencia, int decimal, int binario) { super(binario); this.potencia = potencia; this.decimal = decimal; } public int getPotencia() { return potencia; } public void setPotencia(int potencia) { this.potencia = potencia; } public int getDecimal() { for (int i = decimal - 1; i <= 0; i--){ decimal += Math.pow(2, potencia) * Character.getNumericValue(this.decimal); potencia++; } return decimal; } public void setDecimal(int decimal) { this.decimal = decimal; } @Override public void exibir(){ super.exibir(); System.out.println("Digite um numero Binário: " + this.decimal); } }
-
valeu man, ajudou e muito...coisa besta kkkkk
-
Olá, estou com uma duvida no netbeans, estou programando em Java e estou com uma duvida. Como eu faço para buscar um valor no vetor, sendo que eu ja armazenei os valores, segue o exemplo. package calculadora_binaria; import java.util.Scanner; public class Calculadora_Binaria { public static void main(String args[]) { Scanner ler = new Scanner(System.in); int tabBin[] = new int[16]; tabBin[0] = 0000; tabBin[1] = 0001; tabBin[2] = 0010; tabBin[3] = 0011; tabBin[4] = 0100; tabBin[5] = 0101; tabBin[6] = 0110; tabBin[7] = 0111; tabBin[8] = 1000; tabBin[9] = 1001; tabBin[10] = 1010; tabBin[11] = 1011; tabBin[12] = 1100; tabBin[13] = 1101; tabBin[14] = 1110; tabBin[15] = 1111; System.out.println("Digite um número de '0 á 15' da Tabela!"); Eu quero digita por exemplo 3, aí ele vai lá no vetor [3] e mostra "0011", alguém poderia me ajudar??
-
1. Escreva um programa em Pascal que leia as notas das três provas para todos os estudantes de uma disciplina. 2. Depois de ler as notas o programa deve imprimir a média da última prova. 3. Imprimir a média de cada aluno. Estou com dificuldade em imprimir a media de cada aluno, alguém me ajuda?? Segue algoritmo abaixo: Program Matriz; var nota:array[1..5,1..3] of real; soma: real; i,j:integer; Begin writeln('Programa que calcula as notas finais de uma turma! '); writeln; //Leitura das notas de cada aluno for i:= 1 to 5 do begin write('Digite as notas das três provas do aluno [',i,']: '); readln(nota[i, 1], nota[i,2], nota[i,3]); writeln; end; // Calcula a média da última prova soma:= 0.0; for i:= 1 to 5 do begin soma:= soma + nota[i,3]; end; writeln; writeln('A média da terceira prova foi: ', soma/3:4:2); writeln; writeln; End.
-
Uma função chamada “soma” que usa dois números inteiros como parâmetros e retorna a soma de todos os números inteiros desde o primeiro parâmetro até o último parâmetro. Por exemplo, write(soma(3,6)) deve imprimir 18. Program modulos;var inicio,fim,segundos: integer;function soma...beginend;beginwriteln('Esta parte do programa soma todos os números ');writeln('desde um número incial até um número final');writeln;write('Digite o número inicial: ');readln(inicio);write('Digite o número final: ');readln(fim); writeln;writeln('A soma desde ', inicio, ' até ',fim,' é ', soma(inicio,fim));writeln;end.
-
nao consigo finalizar o programa
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
Ficou pior q antes, compilar ae //NOME DO PROGRAMAProgram Poltrona_teatro; //DECLARANDO VARIAVEISvarcliente:array [0..50] of string;i,numpolt:integer; Beginwriteln('*CADASTRE O NUMERO DA POLTRONA DE [1 á 50]*');writeln('*DIGITE "0 (Zero)" PARA FINALIZAR O PROGRAMA*'); for i:= 1 to 50 do // PERMITE A ENTRADA DE ATE 50 DADOS cliente[i]:= ''; // ASPAS SIMPLES INDICANDO CAMPO VAZIO repeat writeln; writeln('CADASTRE O NUMERO DA POLTRONA'); write('Poltrona: ' ); readln(numpolt); while ((numpolt < 0) or (numpolt > 50)) do begin writeln('Poltrona deve ser de 1 á 50'); writeln; writeln('CADASTRE O NUMERO DA POLTRONA'); write('Poltrona: ' ); readln(numpolt); end; if (cliente[i] = '') then //SE A POLTRONA ESTIVER VAZIA, CONFIRMA MOSTRANDO O CLIENTE E A CONFIRMAÇÃO DA RESERVA beginwriteln;writeln;writeln('CADASTRE O NOME DO CLIENTE'); write('Cliente: '); readln(cliente[i]); writeln('Confirmado'); writeln; end else begin writeln('Poltrona não disponivel! '); //ALERTA PARA SABER SE A POLTRONA ESTA RESERVADA writeln; write('Poltrona<s> não disponiveis: '); for i:= 1 to 50 doif (cliente[i] <> '') thenwrite(' ',numpolt);writeln;writeln;end;until i = 0; writeln('POLTRONA NOME'); //BLOCO QUE MOSTRA AO USUARIO O QUE JA FOI RESERVADO PELO SISTEMA for i:= 1 to 50 do if (cliente[i] <> '') then writeln(' ',numpolt,' ',cliente[i]);End. -
nao consigo finalizar o programa
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
e o " i "do vetor " cliente ", mudo tbem?? -
nao consigo finalizar o programa
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
Agr ele fica dizendo poltrona nao disponivel, sendo que eu nao digitei ele anteriormente //NOME DO PROGRAMA Program Poltrona_teatro; //DECLARANDO VARIAVEIS var cliente:array [1..50] of string; i,numpolt:integer; Begin writeln('CADASTRE O NUMERO DA POLTRONA DE [1 á 50]'); writeln('DIGITE "0 (Zero)" PARA FINALIZAR O PROGRAMA'); writeln; writeln; writeln; for i:= 1 to 50 do // PERMITE A ENTRADA DE ATE 50 DADOS cliente[i]:= ''; // ASPAS SIMPLES INDICANDO CAMPO VAZIO repeat writeln; writeln('CADASTRE O NUMERO DA POLTRONA'); write('Poltrona: ' ); readln(numpolt); while ((numpolt < 0) or (numpolt > 50)) do begin writeln('Poltrona deve ser de 1 á 50'); writeln; writeln('CADASTRE O NUMERO DA POLTRONA'); write('Poltrona: ' ); readln(numpolt); end; if (cliente[i] = '') then //SE A POLTRONA ESTIVER VAZIA, CONFIRMA MOSTRANDO O CLIENTE E A CONFIRMAÇÃO DA RESERVA begin writeln; writeln; writeln('CADASTRE O NOME DO CLIENTE'); write('Cliente: '); readln(cliente[i]); writeln('Confirmado'); writeln; end else begin writeln('Poltrona não disponivel! '); //ALERTA PARA SABER SE A POLTRONA ESTA RESERVADA writeln; write('Poltrona<s> não disponiveis: '); for i:= 1 to 50 do if (cliente[i] <> '') then write(' ',numpolt); writeln; writeln; end; until numpolt = 0; writeln('POLTRONA NOME'); //BLOCO QUE MOSTRA AO USUARIO O QUE JA FOI RESERVADO PELO SISTEMA for i:= 1 to 50 do if (cliente[i] <> '') then writeln(' ',numpolt,' ',cliente[i]); End. -
nao consigo finalizar o programa
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
Fiz esse aqui, o único problema é ele exibir os dados coletados, como na imagem //NOME DO PROGRAMA Program Poltrona_teatro; //DECLARANDO VARIAVEIS var cliente:array [1..50] of string; i:integer; Begin writeln('DIGITE O NUMERO DA POLTRONA DE [1 á 50]'); writeln('DIGITE "0 (Zero)" PARA FINALIZAR O PROGRAMA'); for i:= 1 to 50 do // PERMITE A ENTRADA DE ATE 50 DADOS cliente[i]:= ''; // ASPAS SIMPLES INDICANDO CAMPO VAZIO repeat writeln; write('Poltrona: ' ); readln(i); while ((i < 0) or (i > 50)) do begin writeln('Poltrona deve ser de 1 á 50'); writeln; write('Poltrona: ' ); readln(i); end; if (cliente[i] = '') then //SE A POLTRONA ESTIVER VAZIA, CONFIRMA MOSTRANDO O CLIENTE E A CONFIRMAÇÃO DA RESERVA begin write('Nome: '); readln(cliente[i]); writeln('Confirmado'); writeln; end else begin writeln('Poltrona não disponivel! '); //ALERTA PARA SABER SE A POLTRONA ESTA RESERVADA writeln; write('Poltrona<s> não disponiveis '); for i:= 1 to 50 do if (cliente[i] <> '') then write(' ',i); writeln; writeln; end; until i = 0; if (i = 0) then // BLOCO QUE MOSTRA AO USUARIO O QUE JA FOI RESERVADO PELO SISTEMA begin writeln('POLTRONA NOME'); for i:= 1 to 50 do if (cliente[i] <> '') then writeln(' ',i,' ',cliente[i]); end; End. -
nao consigo finalizar o programa
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
Removi o begin e end do repeat mudei a variavel para as poltronas e ta de 1..50 posiçoes, como antes, ele ta la na variaveis //NOME DO PROGRAMAProgram Poltrona_teatro;//DECLARANDO VARIAVEISvarcliente:array [1..50] of string;i,numpolt:integer;Beginwriteln('CADASTRE O NUMERO DA POLTRONA DE [1 á 50]');writeln('DIGITE "0 (Zero)" PARA FINALIZAR O PROGRAMA');writeln;writeln;writeln; for i:= 1 to 50 do // PERMITE A ENTRADA DE ATE 50 DADOS cliente[i]:= ''; // ASPAS SIMPLES INDICANDO CAMPO VAZIOrepeat writeln; writeln('CADASTRE O NUMERO DA POLTRONA'); write('Poltrona: ' ); readln(numpolt); while ((numpolt < 0) or (numpolt > 50)) do begin writeln('Poltrona deve ser de 1 á 50'); writeln; writeln('CADASTRE O NUMERO DA POLTRONA'); write('Poltrona: ' ); readln(i); end; if (cliente[i] = '') then //SE A POLTRONA ESTIVER VAZIA, CONFIRMA MOSTRANDO O CLIENTE E A CONFIRMAÇÃO DA RESERVA beginwriteln;writeln;writeln('CADASTRE O NOME DO CLIENTE'); write('Cliente: '); readln(cliente[i]); writeln('Confirmado'); writeln; end else begin writeln('Poltrona não disponivel! '); //ALERTA PARA SABER SE A POLTRONA ESTA RESERVADA writeln; write('Poltrona<s> não disponiveis: '); for i:= 1 to 50 doif (cliente[i] <> '') thenwrite(' ',numpolt);writeln;writeln;end;until numpolt = 0;writeln('POLTRONA NOME'); //BLOCO QUE MOSTRA AO USUARIO O QUE JA FOI RESERVADO PELO SISTEMA for i:= 1 to 50 do if (cliente[i] <> '') then writeln(' ',numpolt,' ',cliente[i]);End. -
nao consigo finalizar o programa
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
Eu uso pascalzin, acho q agr ta melhor pra você entender mudei aq e nao ajudou muito, so piorou //NOME DO PROGRAMAProgram Poltrona_teatro;//DECLARANDO VARIAVEISvarcliente:array [0..50] of string;i:integer;Beginwriteln('=RESERVA DE POLTRONAS NUMERADAS= ');writeln('*DIGITE O NUMERO DA POLTRONA DE [1 á 50 *');writeln('*DIGITE "0 (Zero)" PARA FINALIZAR O PROGRAMA *'); for i:= 1 to 50 do // PERMITE A ENTRADA DE ATE 50 DADOS cliente[i]:= ''; // ASPAS SIMPLES INDICANDO CAMPO VAZIOrepeatbegin writeln; write('Poltrona: ' ); readln(i); while ((i < 0) or (i > 50)) dobegin writeln('Poltrona deve ser de 1 á 50'); writeln; write('Poltrona: ' ); readln(i); end; if (i = 0) then // BLOCO QUE MOSTRA AO USUARIO O QUE JA FOI RESERVADO PELO SISTEMA begin writeln('POLTRONA NOME'); for i:= 1 to 50 do if (cliente[i] <> '') then writeln(' ',i,' ',cliente[i]); end; if (cliente[i] = '') then //SE A POLTRONA ESTIVER VAZIA, CONFIRMA MOSTRANDO O CLIENTE E A CONFIRMAÇÃO DA RESERVA begin write('Nome: '); readln(cliente[i]); writeln('Confirmado'); writeln; end elsebegin writeln('Poltrona não disponivel! '); //ALERTA PARA SABER SE A POLTRONA ESTA RESERVADA writeln; write('Poltrona<s> não disponiveis '); for i:= 1 to 50 doif (cliente[i] <> '') thenwrite(' ',i);writeln;writeln; end; end;until i = 0;End. -
Escreva um programa em Pascal que use um vetor para gerenciar a venda de ingressos das poltronas numeradas de um teatro, que tem 50 lugares. Eu consegui fazer uma parte, o único o problema é que quando eu finalizo ele ao aperta 0, ele pede nome e poltrona. Como eu concerto isso? //NOME DO PROGRAMAProgram Poltrona_teatro; //DECLARANDO VARIAVEISvarcliente:array [0..50] of string;i:integer; Beginwriteln(' ============================== ');writeln('===========RESERVA DE POLTRONAS NUMERADAS============');writeln('* *');writeln('* *');writeln('* DIGITE O NUMERO DA POLTRONA DE [1 á 50] *');writeln('* DIGITE "0 (Zero)" PARA FINALIZAR O PROGRAMA *');writeln('* *');writeln('* *');writeln('========================================================'); for i:= 1 to 50 do // PERMITE A ENTRADA DE ATE 50 DADOS cliente[i]:= ''; // ASPAS SIMPLES INDICANDO CAMPO VAZIO repeatbegin writeln; write('Poltrona: ' ); readln(i); while ((i < 0) or (i > 50)) do begin writeln('Poltrona deve ser de 1 á 50'); writeln; write('Poltrona: ' ); readln(i); end; if (i = 0) then // BLOCO QUE MOSTRA AO USUARIO O QUE JA FOI RESERVADO PELO SISTEMA begin writeln('POLTRONA NOME'); for i:= 1 to 50 do if (cliente[i] <> '') then writeln(' ',i,' ',cliente[i]); end; if (cliente[i] = '') then //SE A POLTRONA ESTIVER VAZIA, CONFIRMA MOSTRANDO O CLIENTE E A CONFIRMAÇÃO DA RESERVA begin write('Nome: '); readln(cliente[i]); writeln('Confirmado'); writeln; end elsebegin writeln('Poltrona não disponivel! '); //ALERTA PARA SABER SE A POLTRONA ESTA RESERVADA writeln; write('Poltrona<s> não disponiveis '); for i:= 1 to 50 doif (cliente[i] <> '') thenwrite(' ',i);writeln;writeln; end; end;until i = 0;End. A Imagem da esquerda é a correta e a da direita a incorreta.
-
Faça a tabuada deste número de 1 a 10, alguem me ajuda?
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
Eu tava analisando este algoritmo e tem o seguinte problema, eu quero finalizar ao digitar zero, beleza digito 0 ele finaliza.....mas o problema é, que ele ta somando o zero e eu não quero isso. Como eu conserto??? Segue abaixo o algoritmo: Program Tabuada;varnum:integer;cont:integer;Beginwriteln('DIGITE "0" PARA FINALIZAR O PROGRAMA!'); writeln;writeln;repeat writeln;write('Digite a tabuada: ');readln(num);for cont:= 1 to 10 dobeginwriteln(num:3:0, 'x', cont, '=', (num*cont):6:0); end until num=0; writeln('PROGRAMA ENCERRADO!!!'); End. -
Faça a tabuada deste número de 1 a 10, alguem me ajuda?
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
@Fabio Aragao Parece que sua postagem foi removida, mas obrigado mim ajudou muito!!!! e @Math.Pi Obrigado tbem pela força!!! -
Faça a tabuada deste número de 1 a 10, alguem me ajuda?
ronald1087xd respondeu ao tópico de ronald1087xd em Programação - outros
eu conseguir fazer o que eu queria, fazer ele mim perguntar. Agr eu quero que ele para quando eu digitar "0". Sabe dizer como eu faço isso?? SEGUE ALGORITMO ABAIXO: Program Tabuada; varn,tab: integer;Beginfor tab:= 1 to 10 dobeginwrite('Qual a tabuada: ');readln(tab);for n:= 1 to 10 dowriteln(tab, ' x ', n, ' = ', tab*n);end;End.
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais
Direitos autorais
Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais