Campo Elétrico
Publicado por Roberto Júnior 12/04/2006
[ Hits: 11.207 ]
Homepage: http://sites.google.com/site/dibetao
Este programa plota o gráfico do campo elétrico
gerado por duas caragas elétricas puntiformes.
/**
* @author Roberto Lima da C C Junior
* @file campo.c
*
* @begin Qui Mar 30 2006
* @copyright (C) 2006 by Roberto Lima
* @email dibetao@gmail.com
Este programa plota o gráfico do campo elétrico
gerado por duas caragas elétricas puntiformes.
Para gerar o gráfico voce terá que ter o GNUPlot.
http://www.gnuplot.info/
Quando o programa for compilado (gcc campo.c -lm -o campo)
e executado (./campo), será criado um arquivo (dados.dat)
onde estarão os dados a serem plotados no GNUPLot.
Então basta executar o Gnuplot e digitar o seguinte comando:
plot "dados.dat" w vectors;
O será gerado o grafico do Campo Elétrico criado
pelas duas cargas "q1" e "q2" (gráfico vetorial).
*/
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
main()
{
int i,j,k;
int C,q1,q2,x,y;
float E1[4]={0};//Cria o vetor Campo Elétrico E1 e zera
float R1[4]={0,5,0,0};//Posição da Carga 1 (R1)
float E2[4]={0};//Cria o vetor Campo Elétrico E2 e zera
float R2[4]={0,-5,0,0};//Posição da Carga 2 (R2)
float r[4]={0};//Cria vetor "r", que será feita a "varredura" no espaço.
FILE *arq1;//Arquivo de saida dos dados.
arq1= fopen("dados.dat","w+");//Nome do Arquivo de Saida dos dados (será criado).
C=1;//Constante
q1=1; q2=-1;//Valor das Cargas q1 e q2
for (r[1]=-15; r[1]<=15; r[1]++)
for (r[2]=-15; r[2]<=15; r[2]++)
{
E1[1] = (C*q1*(R1[1]-r[1]))/sqrt( pow(R1[1]-r[1],2) + pow(R1[2]-r[2],2));
E1[2] = (C*q1*(R1[2]-r[2]))/sqrt( pow(R1[1]-r[1],2) + pow(R1[2]-r[2],2));
E2[1] = (C*q2*(R2[1]-r[1]))/sqrt( pow(R2[1]-r[1],2) + pow(R2[2]-r[2],2));
E2[2] = (C*q2*(R2[2]-r[2]))/sqrt( pow(R2[1]-r[1],2) + pow(R2[2]-r[2],2));
fprintf(arq1,"\n%f %f %f %f",R1[1]-r[1]+R2[1]-r[1],R1[2]-r[2]+R2[2]-r[2], E1[1]+E2[1], E1[2]+E2[2]);
}
printf("\n");
fclose(arq1);
}
//FIM de "campo.c"
Também enche a memória, porém desta vez com processos
Fazendo o somatório de 1 até N
Binário para Decimal, Hexa, Char
Cirurgia para acelerar o openSUSE em HD externo via USB
Void Server como Domain Control
Modo Simples de Baixar e Usar o bash-completion
Monitorando o Preço do Bitcoin ou sua Cripto Favorita em Tempo Real com um Widget Flutuante
Script de montagem de chroot automatica
Atualizar Linux Mint 22.2 para 22.3 beta
Jogar games da Battle.net no Linux com Faugus Launcher
Como fazer a Instalação de aplicativos para acesso remoto ao Linux
Assisti Avatar 3: Fogo e Cinzas (4)
Conky, alerta de temperatura alta (11)









