Xaldyn
-
Posts
112 -
Joined
-
Last visited
Content Type
Profiles
Forums
Calendar
Posts posted by Xaldyn
-
-
Non credo che la gente dopo la scuola voglia imparare anche in tivù, la gente è svogliata la tivù fa diventare pigri
-
la mia prof è una stronza si è "accorta" solo oggi che non l'avevamo fatto, cmq ecco l'ho rifatto oggi e con qualche modifica:
PROGRAM v_Limite;
uses crt,dos;
VAR m,df,r,ttot,vs,k,deltat:real;
n,i:integer;
F,t,v,s,a:array[0..10] of real;
CONST g=9.8;
TAB=5;
PROCEDURE Inserimento_dati;
Begin
write ('m = kg '); readln (m);
write ('r = m '); readln ®;
write ('df = kg/V '); readln (df);
write ('k = '); readln (k);
write ('ttot = s '); readln (ttot);
write ('n = '); readln (n);
end;
PROCEDURE Calcolo;
Begin
vs:=4/3*pi*r*r*r;
dt:=ttot/n;
v[0]:=0;
s[0]:=0;
t[0]:=0;
F[0]:=m*g+df*vs*g+k*v[0]*v[0];
a[0]:=F[0]/m;
For i :=0 to N DO
BEGIN
t:=dt+t[i-1];
v:=v[i-1]+a[i-1]*dt;
s:=s[i-1]+v[i-1]*a[i-1]+a[i-1]/2*dt*dt;
F:=m*g-df*vs*g-k*v*v;
a:=F/m;
END
end;
PROCEDURE Uscita_dati;
begin
writeln ('t(s)',TAB,'s(m)',TAB,'v(m/s)',TAB,'a(m/s²)',TAB,'F(N)');
for i:= 0 to n do
begin
writeln;
writeln(t:5:2,TAB,s:5:2,TAB,v:5:2,TAB,a:5:2,TAB,F:5:2);
end;
end;
begin
clrscr;
inserimento_dati;
calcolo;
uscita_dati;readln;
end.
Tab ora l'ho messo come const perchè dovrebbe risultarmi come spazio e non come valore numerico, però non sò come farlo riconoscere solo come spazio, qualcuno di voi lo sa?
-
credo intenda dire come il prosciutto xD no cmq apparte gli scherzi ho visto molti spezzoni e sembra molto divertente certo non credo sia qualcosa di già visto...
-
ehm si con tutta la buona volontà ti ringrazio dell'aiuto che mi stai fornendo ma non puoi farlo in versione grafica quello che mi stai dicendo?
-
quello l'avevo capito, ma non sò come fare sta tabella, purtroppo non ce l'ha spiegata la prof quindi non sò come dirtelo
-
@Linoleum: Su quello mi sono sbagliato mentre lo facevo non ho scritto Readln(Ttot); :P
per deltat non l'ho messo cmq va in real, per la tabella intendo un qualcosa dove inserire i dati
-
vuole una tabella su pascal su Ttot,s,v,a,F non sò come spiegartelo meglio perchè non l'ho mai fatta
-
Program v_limite;
var m,g,df,r,Ttot,vs,k:real
N:integer;
f,t,v,s,a: array [1..10] of real;
Const g=9,8;
Begin
write ('inserisci N'); readln(n);
write ('inserisci massa della sfera'); readln(m);
write ('inserisci raggio della sfera'); readln®;
write ('inserisci densità fluido'); readln(df);
write ('inserisci costante'); readln(k);
write ('inserisci tempo totale dell'osservazione del moto')
vs:=4/3*pi*(r*r*r);
deltat:=Ttot/N;
v[0]:= 0;
t[0]:= 0;
F[0]:= m*g-df-Vs*g-k*v[0]*v[0];
a[0]:=F[0]/m
ris:= m*g-df*vs*g-k*v*v;
For i:= 1 to N do
Begin
t:= t[i-1]+deltat;
v:= v[i-1]+a[i-1]*deltat;
s:= s[i-1]+v[i-1]*deltat+a[i-1]+1/2*deltat*deltat;
F:= m*g-df*vs*g-k*v*v;
a:= F/m;
end;
questo è quanto fatto con la mia prof di Fisica ora i problemi sono molti: non mi ricordo il pascal è da tempo che non lo uso, la prof vuole una tabella ma non sò come farla, qualcuno mi può aiutare?
-
nella mia scuola non è possibile, stracciano di tutto, anche il giornale della scuola
-
l'hanno fatto per nintendo ds che è una console portable non lo fanno per ps2 o il nintendo? ma dai certo forse non lo faranno per altri motivi, ma non credo che il problema siano i personaggi
-
Auguri a tutti e due
-
lui è colto tu no U.U
-
ma quanto sei colto baldo :*
-
la tivù che guardi te non è più informativa cioè che la guardi per sapere come vanno fatte certe cose, ma è diventata puro intrattenimento, uno che torna da scuola o dal lavoro non credo che guardando la tivù la prima cosa che pensa è "cazzo i medici con i defribillatori dovrebbero morire quando li sfregano e invece non gli succede niente come mai?", le persone guardando la tivù non pensano si rilassano, non penso che tu dopo una giornata di scuola straziante e dopo aver studiato ore la materia più pallosa te ne esci fuori con domande assurde sulle imperfezioni dei programmi televisivi. Quindi meno domande stupide.
-
+Otaku
è per dargli più coraggio povero ci ha messo giorni per farlo quel banner :sigh: almeno due voti se li merita...
-
EVVIVA LA TIVì SPAZZATURA
-
io venivo tempo fa, ma per colpa di troppi compiti a scuola ho dovuto frenare le entrare e così non mi sono fatto più vivo, ma per un ghiacciolo farò uno sforzo xD
-
mi immagino se facessero un gioco del genere per Playstation o nintendo xQ_______________________________________________ _ _ _ _ __ _ speriamo che lo facciano
-
ok grazie vedrò di mandarvi il mio disegno al più presto
-
Io non ho mai parlato di google, io ho solo detto se esisteva un programma adatto a tradurre il forum e i post, solo questo non ho mai detto di utilizzare google
-
per quanto riguarda la risoluzione se io faccio un disegno troppo grande e poi con un programma lo rimpicciolisco nella risoluzione adatta va bene oppure devo farlo direttamente con la risoluzione richiesta?
-
Io volevo sapere una cosa, sarebbe possibile avere un programma che traduca il forum e i post in qualunque lingua, almeno per avere non solo utenti italiani ma anche di altri paesi; dico questo perchè non mi sembra che qui ci sia qualcosa da aggiungere è già stato aggiunto tutto quello che serviva e forse questa è l'unica cosa che serve anche se non con un urgenza...il post-count non è una cosa molto importante e sinceramente non vedo il bisogno di postare solo per il gusto di aumentare il numero dei messaggi cmq io ho espresso la mia idea poi pensatela come volete
-
fighissimo peccato che solo in jappone ce stanno ste cose sigh cmq sembra smash bros anche se smash bros ha molti meno personaggi di jump, cmq ho visto i vairi pg ma non ho capito che c'entra ultimate muscle c'è un manga su lui?
-
io ancora devo comprarlo xD quindi mi devo ancora gustare il tutto, però prima vorrei sapere una cosa questa cosa degli scrigni da aprire e da non aprire a che serve? è per avere l'arma finale?
tipo in ffx che bisognava trovare tutte gli scrigni per avere anima?
Aiuto...effetti video
in Off Topic
Posted