Utilisation des fichiers type text

Sur Pascal, il est possible d'utiliser d'autres fichiers externes

La décalration

var
nom_de_variable : text;

Les opérations possibles sur ce genre de fichiers sont les suivantes :

assign (f,'path');
permet de dire que le fichier f se trouve dans le "path" donné

reset(f)
Permet d'ouvrir le fichier pour la lecture

rewrite(f)
permet d'ouvrir le fichier pour l'écriture (si le fichier n'existait pas avant, un nouveau fichier est crée, si un fichier porte son nom, il est écrasé)

close(f)
permet de fermer le fichier (indipensable si on utilise rewrite(f)!!);

Enfin, pour pourvoir lire et écrire c'est simple :

readln(f,s) ça veut dire : lire depuis le fichier f la variable s

writeln(f,s) permet d'écrire dans f la varaible s!!

Conseils pour le bac pratique - Programmation Pascal.

Vous trouverez ici des conseils très utiles pour la bac pratique :

1) Correction des erreurs de compilations

L'erreur de compilation s'affiche en bas de votre fenêtre, les cas les plus classiques sont :

* Oubli d'un ; ou ) ou ( dans ce cas corriger votre syntaxe en rajoutant le symbole manquant

* Type mismatch : problème de type, ceci arrive quand vous utiliser la division avec les integer par exemple, dans ce cas utilisez plutôt div ou si vous utilisez mod pour les réels. Faites attention d'utiliser les bons opérateurs avec les bon types

* Unknown identifier : ceci veut dire que vous n'avez pas défini votre variable, ça peut arriver aussi si vous écrivez mal une fonction ou une procédure

2) Erreurs classiques :

* N'oubliez jamais le uses wincrt; il est indispensable pour l'exécution

* Si vous utilisez une boucle For, faites attention de bien mettre le to ou downto selon que votre boucle "monte" ou "descend"

*Quand vous utilisez les integer, faites bien attention de pas dépasser la limite qui est de 32768m et donc ne pas manipuler des grands nombres. Utilisez le type longint si vous devez absolument travailler avec les grands nombres.

3) Autres erreurs

L'erreur 202 de RunTime peut parfois apparaître, cette erreur est dû au fait que vous utilisez une grande capacité de mémoire. Pensez dans ce cas de limiter l'utilisation, par exemple me déclarer pas un :

array [1..100] of string;

mais plutôt

array [1..100] of string[10];

Et puis bon courage à tout le monde de la part de notre blog.

exercice RC

Exercice d’après www.chimix.com

Un condensateur de capacité C, initialement chargé sous une tension U= 5 V est déchargé à travers un conducteur ohmique de résistance R= 10 kW. On visualise la tenion u_c aux bornes du condensateur au cours de la décharge.

1. Déterminer l'équation différentielle du circuit de décharge en faisant apparaître sur un schéma les grandeurs u_c et i.
2. Vérifier que u_c(t)= U exp( -t/(RC)) est solution de cette équation.
3. Déterminer la constante de temps du circuit en précisant la méthode utilisée et en déduire la capacité du condensateur

                  *********************correction******************************

équation différentielle du circuit de décharge

u_c + Ri = 0 avec q = Cu_c et i = dq/dt = C du_c /dt d'où : u_c + RCdu_c /dt =0 (1)
u_c (t) = U exp( -t/(RC)) ; du_c /dt = U/(-RC) exp( -t/(RC))
repport dans (1) : U exp( -t/(RC)) +RC U/(-RC) exp( -t/(RC)) =0 vérifié quel que soit t.
donc u_c(t)= U exp( -t/(RC)) est solution de cette équation.
constante de temps du circuit

C= t/R = 50 / 10⁴ = 5 10^-3 F.

d’après  http://www.chimix.com/an6/concours/limoge60.htm

correction bac TP

le but de ce sujet est de bien préparer pour passer l'examen du bac TP toutes vos questions seront les bienvenues.
Je tiens à signaler que ce sujet est consacré pour les élèves du 4ème année scientifiques (sciences expérimentales, mathématiques et sciences techniques)

BAC PRATIQUE 25 MAI 2010 A 10 H

Program bac2010;
uses wincrt;
var
n: integer;

Procedure Saisie (Var a: integer);
begin
repeat
writeln ('donnez un entier supérieur ou égale à10');
readln (a);
until (a >=10);
end;

Function verif (a:integer): boolean;
var m,p,K: integer;
begin
Repeat
m:= a div10;
p:= a mod10;
k := Abs (m-2*p);
until
K In [0..9];
verif := K In [0..7] ;
End;

{P,P**
Begin
Saisie (n);
If (verif (n) = True ) then
Writeln (n, 'est divisible par 7')
else writeln (n' n''est pas divisible par 7') ;
End;
end.



BAC PRATIQUE 25 MAI 2010 A 10 H

Program bac2010;
uses wincrt;
var
n: integer;

Procedure Saisie (Var a: integer);
begin
repeat
writeln ('donnez un entier supérieur ou égale à10');
readln (a);
until (a >=10);
end;

Function verif (a:integer): boolean;
var m,p,K: integer;
begin
Repeat
m:= a div10;
p:= a mod10;
k := Abs (m-2*p);
until
K In [0..9];
verif := K In [0..7] ;
End;

{P,P**
Begin
Saisie (n);
If (verif (n) = True ) then
Writeln (n, 'est divisible par 7')
else writeln (n' n''est pas divisible par 7') ;
End;
end.

bobine et circuit RL en physique.exercice physique corrigé

circuit RC détermination dune tension (Mill...

Réaction acido-basique

I - Réaction acido-basique

1) Couple acide base

Un acide est une espèce chimique capable de céder au moins un proton H⁺
Une base est une espèce chimique capable de capter au moins un proton H⁺
Un acide noté AH et sa base conjuguée notée A^- forment un couple acide base noté:
                       AH/A^-
Ils sont reliés par une demie équation protonique:
                         AH=A^-+H⁺
Exemple: acide éthanoique (aussi appellé acide acétique)
CH₃CO₂H/CH₃C02^- (ion éthanoate, aussi appellé acétate)
Certains éléments se comportent à la fois comme un acide et une base: on l'apelle amphotère. L'eau est amphotère.
Elle joue le rôle de base dans le couple:
             H₃O⁺ / H₂O
Et le rôle d'acide dans le couple:
             H₂O / OH^-

2) Equation de réaction acido-basique

Toute réaction acido basique est un transfert de proton(s) mettant en jeu deux couples.
Si un acide A1H réagit avec une base A₂^-
        A₁H / A₁^-
        A₂H / A₂^-
L'équation s'écrira:
      A₁H + A₂^- = A₁^- + A₂H

Exemple: l'acide éthanoique réagit avec l'eau:
   CH₃CO₂H / CH₃CO₂^-
    H₃O⁺ / H₂O

L'équation est donc:
     CH₃CO₂H + H₂O = H₃O⁺ + CH₃CO₂^-