danilo001
-
Posts
44 -
Cadastrado em
-
Última visita
Tipo de conteúdo
Artigos
Selos
Fabricantes
Livros
Cursos
Análises
Fórum
posts postados por danilo001
-
-
Oi pessoal,
Faz alguns meses que comprei um computador novo, comprei também um estabilizador de 1KVA.
Às vezes ele dá uns "trec", acho que porque a fiação aqui de casa é antiga e meu pai ainda vai trocá-la.
Mas a minha dúvida é, vale mesmo a pena usar um estabilizador?
Vejo gente dizendo que sim e outras dizendo que não, umas dizem que danifica a fonte do computador e outras dizem que não tem nada a ver.
Obrigado!
-
Foi isso mesmo... esses pequenos detalhes fazem muita diferença.
Uma última coisa, se eu quiser colocar pra pessoa pressionar uma tecla para repetir o programa, o que coloco?
Exemplo:
"Valor final: X
Deseja sair do programa? S ou N"
Se a pessoa desejasse ficar, o programa iria se repetir.
- 1
-
Oi,
Agradeço MUITO pela ajuda!
Meu código ficou assim:
Program Exercico_28 ; var // I = Número inteiro N, I: Integer; // N = Soma Begin Writeln ('-----------------------------'); Writeln ('| Serão somados os inteiros |'); Writeln ('| inteiros entre 1 e 100 |'); Writeln ('-----------------------------'); I := 1; While(I <= 100) do begin N := N + I; I := I + 1; end; Writeln(N); End.
Sempre que executo ele, o valor final é diferente. Isso achei meio estranho.
Mas, mostrei ao meu professor e ele não apontou um erro.
Obs.: Os "writeln" que coloquei aqui no início, foi pra deixar mais "bonitinho" kk
- 1
-
É verdade, acho que quando eu estava corrigindo ele, devo ter recortado e colado ele sem perceber.
Agora está funcionando 100%
Muito obrigado pela ajuda!
- 1
-
É esse:
Program Exercicio_27 ; var T, I, R: Integer; //T = Número da tabuada; I = Número da multiplicação //R = Resultado Begin T := 1; While (T <= 20) do begin I := 1; While (I <= 10) do begin R := T * I; I := I + 1; Writeln (T ,'x', I, ' = ', R); end; T := T + 1; readkey; end; End.
- 1
-
-
Agora deu certo!
O estranho é que, ele começa fazendo o número da tabuada multiplicado por 2, até 11.
Tipo:
"1 x 2"
"1 x 3'
...
"1 x 11"
Mas teria que ser:
"1 x 1"
...
"1 x 10"
OBS.: Esqueci de dizer, apesar disso, a multiplicação mostra normal..
"1 x 2 = 1"
e assim por diante... estranho isso
Program Exercicio_27 ; var T, I, R: Integer; //T = Número da tabuada; I = Número da multiplicação //R = Resultado Begin T := 1; While (T <= 20) do begin I := 1; While (I <= 10) do begin R := T * I; I := I + 1; Writeln (T ,'x', I, ' = ', R); end; T := T + 1; readkey; end; End.
- 1
-
Consegui deixar essa forma, agora exibe, mas fica:
"1 x true" - dez vezes
A partir do 2 fica:
"2 x false" - dez vezes
Até o 20, quer seria a última tabuada a exibir.
Program Exercicio_27 ; var T, I, R: Integer; //T = Número da tabuada; I = Número da multiplicação //R = Resultado Begin T := 1; While (T <= 20) do begin I := 1; While (I <= 10) do begin R := T * I; Writeln (T ,'x', I = R); I := I + 1; end; T := T + 1; readkey; end; End.
- 1
-
Eu tenho um exercício para fazer em pascal que pede:
"Exibir a tabuada dos valores de um a vinte, no intervalo de um a dez. Entre as tabuadas, solicitar que o usuário pressione uma tecla."
Eu até consegui fazer o algoritmo, eu acho, mas quando vou executar fica sem exibir nada, a tela fica totalmente preta... poderiam me dar uma dica do que errei, ou esqueci?
Program Exercicio_27 ; var T, I, R: Integer; //T = Número da tabuada; I = Número da multiplicação //R = Resultado Begin T := 1; I := 1; While (T <= 20) do begin R := T * I; end; While (I <= 10) do begin Write (T ,'x', I = R); I := I + 1; end; readkey; End.
Obrigado!
- 1
-
Acho que não consegui explicar direito, e o código não ajudou muito.
A questão diz: "Exibir a soma dos números inteiros positivos do intervalo de um a cem."
- 1
-
Estou com dúvida de como prosseguir um código (se é que comecei certo)
Eu preciso exibir a soma dos valores positivos entre 1 e 100.
O código, meu frankstein, que fiz ficou assim:
Program Exercico_28 ; var N, I, soma: Integer; Begin Writeln ('-----------------------------'); Writeln ('| Serão somados os inteiros |'); Writeln ('| inteiros entre 1 e 100 |'); Writeln ('-----------------------------'); I := 1; N := I + I; soma := N + I; While(soma <= 0) do begin Writeln('Digite somente números positivos!'); Readln(soma); end; While(soma > 100) do begin Writeln ('Valores somados!'); Readln (soma); end; End.
Não preciso nem dizer que não funciona, não é? hehe
A minha dúvida é, o que devo corrigir?
Eu preciso simplesmente exibir as somas, nada mais.
Obrigado!
- 1
-
Deu certo, acho que eu levei em conta apenas ele não aceitar letras diferentes de M ou F, ele ficava em looping mas consegui ajeitar isso.
Obrigado!!
- 2
-
Não sei como prosseguir, acho que meu primeiro erro foi já no começo, quando coloquei os 2 "Readln" para apenas 1 "Write", ou não tem problema?
Os dois últimos "Write" deixei em branco porque não sei como continuar.
Se eu digitar M ele fica em looping, se eu digitar F não acontece nada.
Teria que criar 1 "while...do" para M e outro para o F?
Eu até tentei mas diz que a expressão é inválida.
Program Exercicio_23 ; var F: String; M: String; Begin Write (' Digite o sexo: '); Readln (F); Readln (M); While (F <> M ) do begin Write ('É do sexo, '); Writeln (''); end; End.
- 1
-
Oi pessoal,
Estou fazendo alguns exercícios que meu professor me passou, utilizando a estrutura de repetição.
Um dos exercício diz: "Entrar via teclado com o sexo de determinado usuário, aceitar somente “F” ou “M” como respostas válidas."
To quebrando a cabeça, se não já quebrei, mas não consigo fazer o código utilizando "while...do".
Alguém pode me dar uma luz?
Obrigado!
- 1
-
Oi pessoal,
Se eu estiver criando o tópico na área errada peço desculpas.
Estou fazendo engenharia da computação, 2º semestre, e nas aulas de programação estamos aprendendo sobre o pascal (pascalzim)
Meu professor passou uma lista de exercícios para resolvermos e minha única dúvida, até agora é:
Como faço para "repetir" o programa?
Vou tentar explicar melhor, vamos supôr que eu termine o programa (vou deixar ele abaixo), mas caso eu queira iniciar ele novamente eu aperte uma tecla (tecla s para sim, por exemplo), qual o código que uso? Ou, alguma dica de como pôr o código?
Obrigado!
Program Exercicio_21 ; var V: Integer; Begin Write ('Digite um valor positivo: '); Read (V); While (V < 0) do begin Writeln ('O valor é negativo'); Writeln ('Digite apenas valores positivos'); Read (V); end; Writeln (''); Writeln ('O valor foi aceito por ser posivito'); End.
- 1
-
@Matheus32sXe Eu não pretendo pegar uma placa muito potente, estou a escolher ainda mas pretendo pegar uma na faixa dos R$ 500,00. Não vou rodar jogos pesados, eles são tipo Mu Online, Crossfire, Paladins.
A minha placa-mãe é essa: http://www.asrock.com/mb/Intel/D1800B-ITX/
Acabei de achar no site da Asrock, é de computador de mesa.
Pelo o que pude ver, o processador é soldado na placa.
Acredito que o mais viável de início seja eu trocar tanto a placa quanto o processador primeiro antes de pensar na placa de vídeo já que o Celeron, apesar de não ser tão ruim, é considerado uma "peça de museu" em alguns quesitos.
A propósito, a fonte eu só consigo ver qual é abrindo o computador, correto?
Agradeço pela atenção!
-
@Michel. Obrigado!
@Matheus32sXe Meu processador é o Celeron J1800 de 2.41 GHz.
Quanto a fonte, vou ver quando chegar em casa.
Para saber qual é, só abrindo o gabinete? Ou há outra forma?
Obrigado!
-
Olá,
Sou novo aqui no fórum, se estiver postando numa área errada por favor me desculpem.
Gostaria de saber uma forma de identificar quais placas de vídeo são compatíveis com minha placa-mãe.
Tirei uma print na tela do CPU-Z, ela é uma ASROCK D1800B-ITX
Tento procurar na internet mas não encontro nada.
Obrigado!
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
Upgrade de processador e placa de vídeo.
em Montagem e upgrade de computadores de mesa
Postado
Olá,
Estou pensando em trocar meu processador e colocar uma placa de vídeo.
As configurações atuais do meu computador são:
Processador: Intel Celeron J1800 - 2.41GHz (Socket 1170 BGa);
Memória: 8 GB;
Placa de Vídeo: Não tenho ;
placa-mãe: ASRock D1800B-ITX.
Seria uma boa colocar o Pentium G4560?
Há alguma placa de vídeo que me recomendam?
Minha pretensão é para jogos tipo CS:GO; GTA V... não precisa ser no ultra ou máximo, eu rodando no mínimo pra poder jogar já basta hehe.
Obrigado