aidez moi SVP

[invite6d23dab7]

svp aidez moi!!!
j'avais un Tp en turbo pascal sur les boucles

voilà l'exo :

Soit la suite u definie par u1 = 0, u2 = 9 et la relation de recurrence : Pour tout n et n entier:un+2 = 6un+1 - 9un.
On pose pour tout n de N, Sn la somme des n premiers termes de la suite.


-Ecrire un programme en Turbo-Pascal qui demande la valeur de n puis qui calcule et affiche un.
-Completer le programme precedent, pour qu'il calcule et affiche Sn.

Alors corrigez moi ce programme , est ce qu'il est juste ou non ??

Program suit1;
Uses crt;
Var i,n: Integer; u,v,s,aux:Real;
Begin
clrscr;
Writeln('Entrer n>0');Readln(n);
if (n=0) then writeln ('erreur')
Else
if (n=1) then Writeln ('u1=0 et s1=0')
Else
Begin
u:= 0 ; v:= 9 ; s:= 9;
For i := 3 to n Do
Begin
aux := u; u:= v ; v:= 6*v-9*aux;
s:= s+v;
end;
writeln ('u-',n,'=',v,'et s-',n,'=',s);
end;
readln;
end.

-----

[JPL]

Rappel de la charte du forum :

La courtoisie est de rigueur sur ce forum : pour une demande de renseignements bonjour et merci devraient être des automatismes.

Les titres des messages doivent être explicites.

[invite6d23dab7]

Bonjour tous le monde

[invite2d7144a7]

Bonjour,

Là, c'est carrément loupé comme tentative de rattrapage.

[A voir en vidéo sur Futura]

[Jack]

et réussir à faire une faute dans 4 mots ...

Alors corrigez moi ce programme , est ce qu'il est juste ou non ??

Pourquoi ne pas tout simplement essayer?

Le code doit être correctement indenté pour en faciliter la lecture.
Merci.

[polo974]

Turbo Pascal est un environnement de développement intégré pour le langage Pascal. Sa puissance et son prix « démocratique » ont fait son succès dans les années 1980 et 1990.

Bonne année 2013.

[invite2d7144a7]

Bonjour,

Bonne année 2013.

Oui, mais dans l'éduc-nat, ils l'utilisent encore systématiquement, bien qu'il existe des analogues plus récents et gratuits (FreePascal par exemple, qui est même allé jusqu'à reproduire exactement l'interface de TP !).

J'ai beau gueuler régulièrement contre ça, rien ne bouge, et rien ne bougera tant qu'ils auront des OS permettant l'utilisation de ces dinosaures sans avoir d'abord à installer 3 ou 4 trucs particulièrement chiants (et encore, je me demande...).

[Jack]

Bonjour,

Oui, mais dans l'éduc-nat, ils l'utilisent encore systématiquement, bien qu'il existe des analogues plus récents et gratuits (FreePascal par exemple, qui est même allé jusqu'à reproduire exactement l'interface de TP !).

J'ai beau gueuler régulièrement contre ça, rien ne bouge, et rien ne bougera tant qu'ils auront des OS permettant l'utilisation de ces dinosaures sans avoir d'abord à installer 3 ou 4 trucs particulièrement chiants (et encore, je me demande...).

Le systématiquement est de trop.
Cette vénérable institution emploie quelques personnes normales. Enfin, je crois ...

[invite2d7144a7]

Bonjour,

Oui, j'en connais 2 ou 3 qui utilisent FreePascal, MAIS

c'est contre les directives (ce qui justifie le "systématiquement"), et ils prennent le risque d'un blâme, ou pire ..

[Jack]

tu parles de l'enseignement du pascal dans quelles classes exactement?

[Jack]

D'autant que le seul enseignement pré-bac en France date de cette année, en classe de S. Il me semble que python par exemple est mis en avant.

A+

[invite2d7144a7]

Bonjour,

J'aurais dû écrire "j'ai connu", et tout à l'avenant (donc au passé).

C'était dans les cours d'initiation à la programmation (collèges et lycées), je ne sais même pas si ça existe encore.

[invite43901482]

Il me semble que python par exemple est mis en avant.

Oui avec sa spécialité ISN