NewsLetter
Pour vous inscrire à la NewsLetter :

Inscription Desinscription

HTML
Introduction
Cours

C
Cours

VBasic
Introduction
Cours
Codes sources
Freewares
Dlls

QBasic
Introduction
Cours

68HC11
Introduction
Montage
Implantation
Informations
Cours

Pascal
Cours







Navigation

Exercice 1 convertion Franc/Euro!

Une instruction pascal se termine TOUJOURS par un ";" cela signale au compilateur que l'instruction est terminé

Un programme en pascal se commence toujours par la même ligne que l'on appelle entête.
program NomDeVotreProgramme;

Il sagit maintenant de definir les differentes variables qui seront utilisees dans le programme!
Definir une variable consiste en tout et pour tout a la nommer et a definier son type!
var NomDeLaVariable:TypeDeLaVariable;

Les instructions en pascal sont toujours encadrées par :
BEGIN
..........
..........
END.

Passons aux choses serieuses, comment afficher un message a l'ecran.
L'instruction est tres simple:
writeln('Votre message ....');
ou
write('Votre message ....');
Writeln fait aller a la ligne le curseur d'affgichage apres l'affichage et donc le prochain affichage se fera sur la ligne du dessous.
Tandis que write laisse le curseur a la fin de l'affichage et dons le prochain affichage se fera a la suite du message!

Maintenant voyons l'instruction de saisi au clavier. elle s'utilise ainsi:
read(VotreVariable);
Cela signifie que le nom de le variable mis entre parenthese se vera affecter la valeur entrez aun clavier par l'utilisateur.
ATTENTION: READ n'est pas capable d'afficher un message a l'acran il est donsc preferable de preceder un READ par un WRITE qui precisera ce que le programme attend!

Une specification du pascal est sa facon de coder le signe "=". Enfet il faut differancier le signe de comparaison et le signe d'affectation.
Le signe d'affectation qui sera untiliser dans notre programme se code ainsi:
Variable1:=Variable2;
Cela signifie que la valeur contenue dans le Variable2 est recopié dans la Variable1.

Voici maintenant le programme en tant que tel!

program exercice1;
var Pfranc,Peuro:real;
begin
write('Entrez votre prix en Franc :');
readln(Pfranc);
Peuro:=Pfranc/6.55957;
writeln(Pfranc,'F en euro vaut: ',Peuro);
end.

Quelques remarques:
1-Le pascal est un langage d'origine anglosaxonne donc la virgule decimale "," est remplacer par un point "."!
2-Lors de l'execution du programme on remarquera que le resultat est afficher en notation scientifique (avec un chiffre devant la virgule heuu le point :)). Pour corriger ce problemme il faut "formater" l'affichage (on le verra a la prochaine lecon).

Tous droits réservés © Programmation-fr.com 2004