Turbo pascal

Résumé du document

Turbo pascal, cours de 30 pages avec exercices

Extraits

[...] Exemple : program Exemple_d_instruction_case_l var n : integer begin write ('donnez un entier ; readln case n of : writeln ('petit') ; : writeln ('moyen') ; : writeln ('grand') else writeln ('très grand') end ; write revoir') end. IV. Syntaxe générale de l'instruction case of : Elle peut prendre une de ces deux formes : 3 case variable of domaine_1: instruction_1; domaine_2: instruction_2; . domaine_n: instruction_n end case variable of domaine_1: instruction_1; domaine_2: instruction_2; . domaine_n: instruction_n; else instruction_bis end V. [...]

[...] Chapitre Introduction. I. Structure d'un programme. L'en-tête Les déclarations (var, const, types, procedures, functions . ) begin le programme end. Exercice 1 : écrire un programme écrivant bonjour à l'écran. II. Les types de variables. [...]

[...] write et writeln. Exemple 2 : taper le programme suivant et observer les sorties écran program Affichage_formate ; var p : integer ; y : real ; cl, c2 : char ; ok : boolean ; begin n 3 ; p 125 ; x 1.23456 e2 ; y 2.0 ; cl ; c2 ; ok false ; writeln ('nombre', ; writeln ; writeln c2:6, ok:7) ; writeln ; writeln ('bonjour':3, ok:2) ; writeln ; writeln ; writeln ; writeln ; writeln ; writeln end. [...]

[...] Instruction : A prend la valeur 3 B prend la valeur de ici 3 Exercice 3 : Indiquer ce que contiennent les cases mémoires associées aux variables alpha, beta, gamma, I et n au cours de l'exécution du programme suivant : (UTILISER LE MODE PAS À PAS) Program escalope; var alpha, beta, gamma : integer; I,n : boolean; begin alpha:=1; beta:=alpha+1; gamma:=2*beta-3; beta:=beta+1; alpha:=alpha div I:=true; n:=false; n:=(true)or(false); 1 write(‘alpha ‘,alpha,' beta ‘,beta,' gamma ‘,gamma,' I n end. écrire un programme permutant deux variables a et b. écrire un programme calculant l'aire d'un disque, et son périmètre dont on fournit le rayon ( noter qu'en Turbo-Pascal, il existe une constante prédéfinie pi). IV. [...]