![]() |
|
|
Planilha de Dimensionamento de Tubulações
Hidráulicas Água Fria e Água Quente CompletaNossa planilha automática de dimensionamento de tubulações de água fria e quente é uma ferramenta desenvolvida para auxiliar engenheiros e projetistas no cálculo rápido e preciso das redes hidráulicas de edificaçoes. Por meio da inserçao de dados como vazao, diâmetro da tubulaçao, comprimento da rede, material do tubo e coeficientes hidráulicos, a planilha realiza automaticamente os cálculos necessários para verificar velocidade da água, perda de carga e dimensionamento adequado das tubulaçoes. |
||
Você está aqui: Cards de Python |
||
|
||
|
|
||
Java ::: Desafios e Lista de Exercícios Resolvidos ::: Estruturas de Controle |
Exercícios Resolvidos de Java - Ler os lados de um triângulo e informar se ele é isósceles, escaleno ou equiláteroQuantidade de visualizações: 13672 vezes |
|
Pergunta/Tarefa: Um triângulo é uma forma geométrica (polígono) composta de três lados, sendo que cada lado é menor que a soma dos outros dois lados. Assim, para que um triângulo seja válido, é preciso que seus lados A, B e C obedeçam à seguinte regra: A < (B + C), B < (A + C) e C < (A + B). Escreva um programa Java que leia os três lados de um triângulo e verifique se tais valores realmente formam um triângulo. Se o teste for satisfatório, informe se o triângulo é isósceles (dois lados iguais e um diferente), escaleno (todos os lados diferentes) ou equilátero (todos os lados iguais). Sua saída deverá ser parecida com: Informe o primeiro lado do triângulo: 30 Informe o segundo lado do triângulo: 40 Informe o terceiro lado do triângulo: 60 O triângulo é escaleno Veja a resolução comentada deste exercício usando Java:
package estudos;
import java.util.Scanner;
public class Estudos {
public static void main(String[] args) {
// vamos fazer a leitura usando a classe Scanner
Scanner entrada = new Scanner(System.in);
// vamos ler o primeiro lado do triângulo
System.out.print("Informe o primeiro lado do triângulo: ");
int ladoA = Integer.parseInt(entrada.nextLine());
// vamos ler o segundo lado do triângulo
System.out.print("Informe o segundo lado do triângulo: ");
int ladoB = Integer.parseInt(entrada.nextLine());
// vamos ler o terceiro lado do triângulo
System.out.print("Informe o terceiro lado do triângulo: ");
int ladoC = Integer.parseInt(entrada.nextLine());
// os lados informados formam um triângulo?
if((ladoA < (ladoB + ladoC)) && (ladoB < (ladoA + ladoC))
&& (ladoC < (ladoA + ladoB))){
// é um triângulo equilátero (todos os lados iguais)?
if((ladoA == ladoB) && (ladoB == ladoC)){
System.out.println("O triângulo é equilátero");
}
else{
// é isósceles (dois lados iguais e um diferente)?
if((ladoA == ladoB) || (ladoA == ladoC) || (ladoC == ladoB)){
System.out.println("O triângulo é isósceles");
}
else{
// é escaleno
System.out.println("O triângulo é escaleno");
}
}
}
else{
System.out.println("Os lados informados não formam um triângulo.");
}
}
}
|
Delphi ::: Data Access Controls (Controles de Acesso a Dados) ::: TClientDataSet |
Como obter a quantidade de registros em um TClientDataSet do Delphi usando a propriedade RecordCountQuantidade de visualizações: 12073 vezes |
|
Em algumas situações precisamos saber a quantidade de registros atualmente armazenados em um componente TClientDataSet. Para isso podemos usar a propriedade RecordCount, implementada originalmente na classe TDataSet e reimplementada na classe TClientDataSet. Veja um trecho de código no qual usamos o evento OnClick de um botão para exibir a quantidade de registros atualmento no TClientDataSet:
procedure TForm3.Button3Click(Sender: TObject);
var
qRegistros: Integer;
begin
// obtém a quantidade de registros no TClientDataSet
qRegistros := ClientDataSet1.RecordCount;
// mostra o resultado
ShowMessage('O ClientDataSet possui ' + IntToStr(qRegistros)
+ ' registros.');
end;
Ao executar o código e clicar no botão você verá uma mensagem parecida com: "O ClientDataSet possui 20 registros.". Esta dica foi escrita e testada no Delphi 2009. |
Node.js ::: Dicas & Truques ::: Arquivos e Diretórios |
Como obter o diretório de instalação do Node.js - O diretório de trabalho do Node.jsQuantidade de visualizações: 2557 vezes |
|
Em algumas situações nós gostaríamos de obter o diretório de instalação, ou diretório de trabalho do Node.js. Isso pode ser feito por meio da variável __dirname ou da função cwd() do objeto process. Tanto a variável quanto a função process.cwd() fazem parte do core do Node.js e não precisam ser importados. Veja abaixo um exemplo de um aplicação funcional que mostra o nome do diretório de trabalho:
// importamos o módulo HTTP
var http = require("http");
http.createServer(function(request, response){
// Aqui nós enviamos o cabeçalho HTTP, com a resposta
// 200 (OK) e o content type text/plain
response.writeHead(200, {'Content-Type': 'text/plain'});
// Vamos obter e mostrar o diretório de trabalho do Node.js
var diretorio = __dirname;
// poderíamos também usar
// var diretorio = process.cwd();
response.write('O diretório de trabalho é: ' + diretorio + '\n');
// fechamos a resposta HTTP
response.end();
}).listen(8081); // o HTTP server vai ouvir na posta 8081
// Que tal uma mensagem no console?
console.log('O servidor está ouvindo em http://127.0.0.1:8081/');
Depois de executar o servidor, abra seu navegador no endereço http://127.0.0.1:8081 e você terá o seguinte resultado: O diretório de trabalho é: c:\estudos_nodejs |
Delphi ::: VCL - Visual Component Library ::: TListBox |
Como usar um laço for para pesquisar valores nos itens de uma ListBox do DelphiQuantidade de visualizações: 13337 vezes |
Nesta dica mostro como é possível pesquisar valores nos itens de uma ListBox. Note que, se o valor pesquisado for encontrado, nós o selecionamos na lista e informamos seu índice. Se não for encontrado nós ajustamos uma variável Boolean e avisamos do não sucesso da operação. Finalmente note que este código faz diferenciação de letras maiúsculas e minúsculas, ou seja, Osmar será diferente de OSMAR. Veja o código:
procedure TForm1.Button2Click(Sender: TObject);
var
i: Integer;
pesquisa: string;
encontrou: Boolean;
begin
// vamos solicitar o texto a ser pesquisado na ListBox
pesquisa := InputBox('Pesquisar', 'Informe o texto', '');
encontrou := false;
// vamos usar um laço for para percorrer todos os itens
// da ListBox
for i := 0 to ListBox1.Count - 1 do
begin
if ListBox1.Items[i] = pesquisa then
begin
encontrou := true;
// vamos selecionar o item encontrado
ListBox1.ItemIndex := i;
ShowMessage('O texto pesquisado foi encontrado ' +
'no índice ' + IntToStr(ListBox1.ItemIndex));
end;
end;
// não foi encontrado?
if not encontrou then
begin
ShowMessage('O texto pesquisado não foi encontrado.');
end;
end;
Para fins de compatibilidade, esta dica foi escrita usando Delphi 2009. |
LISP ::: Dicas & Truques ::: Matemática e Estatística |
Como calcular MDC em Lisp usando a função GCDQuantidade de visualizações: 1188 vezes |
|
Atualmente a definição de Máximo Divisor Comum (MDC) pode ser assim formalizada: Sejam a, b e c números inteiros não nulos, dizemos que c é um divisor comum de a e b se c divide a (escrevemos c|a) e c divide b (c|b). Chamaremos D(a,b) o conjunto de todos os divisores comum de a e b. Podemos calcular o Máximo Divisor Comum na linguagem Common Lisp usando a função GCD. Esta função aceita um número ilimitado de valores inteiros e retorna seu Máximo Divisor Comum. Veja um trecho de código Common Lisp no qual pedimos para o usuário informar dois números inteiros e, em seguida, fazemos uso da função GCD para retornar o MDC: ; variáveis que vamos usar no programa (let ((num1)(num2)(mdc)) ; Vamos ler o primeiro número (princ "Informe o primeiro número: ") ; talvez o seu compilador não precise disso (force-output) ; atribui o valor lido à variável num1 (setq num1 (read)) ; Vamos ler o segundo número (princ "Informe o segundo número: ") ; talvez o seu compilador não precise disso (force-output) ; atribui o valor lido à variável num2 (setq num2 (read)) ; Vamos obter o MDC dos dois números informados (setq mdc (gcd num1 num2)) ; E mostramos o resultado (format t "O Máximo Divisor Comum é: ~D" mdc) ) Ao executarmos este código Common Lisp nós teremos o seguinte resultado: Informe o primeiro número: 9 Informe o segundo número: 12 O Máximo Divisor Comum é: 3 |
Veja mais Dicas e truques de LISP |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |




