physique chimie ,maths, sciences
Physique chimie au Lycée : soutien scolaire en vidéo pédagogiques
2eme secondaire
Exercice cinétique chimique
t (min) | 0 | 2 | 4 | 6 | 8 | 10 | 12 | 14 | 16 |
x (mmol) | 0 | 0,50 | 0,80 | 1,05 | 1,2 | 1,35 | 1,45 | 1,50 | 1,55 |
dx/dt (mmol/mn) | 0,60 | 0,20 | 0,15 | 0,10 | 0,08 | 0,06 | 0,04 | 0,025 | 0,025 |
*****************************correction*************************************
1- Zn + I2 === Zn2+ + 2I-
2- n1 =m/M = 6.5/65 = 0.10 mol
équation de la réaction | Avancement (en mol) | Zn | + | Zn2+ | 2I- | | |
Etat initial | 0 | n1 | | n2 | | 0 | 0 |
Etat en cours de transformation | X | n1 - x | | n2 - x | | x | 2 . x |
Etat final | xf | n1 - xf | | n2 - xf | | xf | 2 . xf |
[I2]aq®0 |
Représentation graphique (respect de t1/2 et respect de xf)
fiche de révision : Oscillateur mécanique forcé Méthode de Fresnel












correction Examen du baccalaureat, session de juin 2010, science de l'informatique le 27 mai 2010 à 8h30
program min_max;
uses wincrt;
type
fich = file of byte;
var
f:fich;
n:byte;
pn,gn:string;
(*la defintion de la procedure remplir*)
procedure remplir(var f:fich; var n:byte);
var
i,x:byte;
begin
repeat
write('donner n:');
readln(n);
until(n>2)and(n<=50);
rewrite(f);
for i:= 1 to n do
begin
x := random(9) + 1;
writeln(x);
write(f,x);
end;
close(f);
end;
(*la defintion de la procedure construction_nombre*)
procedure nombres(var f:fich;n:byte; var pn,gn:string);
var
x,k,j,i:byte;
c:string;
begin
reset(f);
read(f,x);
str(x,c);
pn := c;
gn := c;
for i:= 2 to n do
begin
read(f,x);
str(x,c);
j := 1; k:=1;
while(c < gn[j])and( j <= length(gn) )do
begin
j := j + 1;
end;
insert(c,gn,j);
while (c > pn[k]) and (k <= length(pn) ) do
begin
k := k +1;
end;
insert(c,pn,k);
end;
writeln('le plus grand nombre:',gn);
writeln('le plus petit nombre:',pn);
close(f);
end;
(*la defintion de la procedure verif*)
procedure verif(gn:string);
var
i,j,k,ci,cj:byte;
r,r1,av,nv:integer;
er:integer;
begin
i := 1;
j := length(gn);
val(gn[i],ci,er);
val(gn[j],cj,er);
av := ci - cj;
i := i + 1;
j := j - 1;
val(gn[i],ci,er);
val(gn[j],cj,er);
nv := ci - cj;
r := nv - av;
r1 := r;
k := length(gn);
while( i < k div 2 )and(i+j = k+1) and (r1 = r) do
begin
av := nv;
i := i + 1;
j := j - 1;
val(gn[i],ci,er);
val(gn[j],cj,er);
nv := ci - cj;
r1 := nv - av;
end;
if (r1 = r)then
writeln('la suite est arithmétique, son raison = ', r)
else
writeln('cette suite n''est pas arithmétique.');
end;
(*Le programme principal*)
begin
assign(f , 'c:\bac2010\123456\nombres.dat');
randomize;
remplir(f,n);
nombres(f,n,pn,gn);
verif(gn);
end.
série d'exercices algorithmique 3SI (Enoncé + correction)
Exercice 7 :
Ecrivez un programme qui lit un nombre décimal positif au clavier et qui calcule la valeur de ce nombre arrondie au centième inférieur, puis l'affiche.
Exemple : 42.2135789 à 42.21
Solution
program Serie1Ex7;
uses wincrt;
var
x:real;
begin
writeln('Donner le réel x');
readln(x);
x:=(round(x*100))/100;
writeln(x:6:2);
end.
série d'exercices algorithmique 3SI (Enoncé + correction)
Exercice 6 :
Ecrivez un programme qui lit une ligne en entrée et affiche le nombre de caractères de cette ligne.
Exemple : Voici une ligne de texte. à 25
Solution :
program Serie1Ex6;
uses wincrt;
var
s:string;
begin
readln(s);
writeln(length(s));
end.
série d'exercices algorithmique 3SI (Enoncé + correction)
Exercice 5 :
Ecrivez un programme qui lit un nombre décimal positif au clavier et qui affiche la valeur de ce nombre, arrondie à l'entier le plus proche. Dans le cas où la partie décimale du nombre est égale à 0.5, on arrondira à l'entier supérieur. Par exemple, pour 4.5, on devra afficher 5.
Solution :
program Serie1Ex5;
uses wincrt;
var
x:real;
begin
writeln('Donner l''entier à arrondir');
readln(x);
writeln(round(x));
end.
série d'exercices algorithmique 3SI (Enoncé + correction)
Exercice 4 :
Ecrire un programme qui lit deux réels a et b comme étant les deux cotés droits d’un triangle rectangle puis d’afficher la longueur de l’hypoténuse correspondante.
Solution :
program Serie1Ex4;
uses wincrt;
var
a,b,c:real;
begin
writeln('Donner les longueurs des deux côtés droits');
readln(a,b);
c:=sqrt(sqr(a)+sqr(b));
writeln(c:6:2);
end.