Comment programmer avec une calculatrice [Résolu]

Program TP1;
Uses Crt;
Var M1,M2,X:Real; choix:Char;

Procedure Effacer(Tout:Boolean);
begin
M1:=0;
IF Tout=True then M2:=0;
end;

Procedure Store;
begin
M2:=M1;
end;

Procedure Addition(A:Real);
begin
M1:=M1+A;
end;

Procedure Soustraction(A:Real);
begin
M1:=M1-A;
end;

Procedure Multiplication(A:Real);
begin
M1:=M1*A;
end;

Procedure Division(A:Real);
begin
IF A<>0 then M1:=M1/A
Else Writeln('ERREUR!: A ne doit pas ˆtre=0');
end;

Procedure DivX(A:Real);
begin
IF A<>0 then M1:=ABS(INT(M1))/INT(A)
Else writeln('ERREUR!: A ne doit pas ˆtre=0');
end;

Procedure Factoriel;
var E:Real;
begin
M1:=ABS(INT(M1)); E:=M1-1;
While E>1 do Begin
M1:=M1*E; E:=E-1;
End;
end;

Procedure Puissance(A:Real);
var E:Real;
begin
IF A=0 then M1:=1
Else Begin
E:=ABS(INT(A));
While E>0 do begin
M1:=M1*E; E:=E-1;
end;
End;
end;

BEGIN
ClrScr;
Repeat
GoToXY(15,1); Writeln ('********** PROGRAMME MACHINE A CALCULER **********');
GotoXY(38,3); Writeln ('MENU');
GoToXY(28,5); Writeln('1) Saisir la M‚moire M1');
GoToXY(28,6); Writeln('C) Effacer la M‚moire M1');
GoToXY(28,7); Writeln('T) Tout Effacer');
GoToXY(28,8); Writeln('S) Store');
GoToXY(28,9); Writeln('+) Addition');
GoToXY(28,10); Writeln('-) Soustraction');
GoToXY(28,11); Writeln('*) Multiplication');
GoToXY(28,12); Writeln('/) Division');
GoToXY(28,13); Writeln('%) Division EntiŠre');
GoToXY(28,14); Writeln('P) Puissance');
GoToXY(28,15); Writeln('!) Factoriel');
GoToXY(28,16); Writeln('Q) Quitter');
GoToXY(17,18); Write('M1=',M1:2:4); Write(' M2=',M2:2:4);
GoToXY(28,20); Write('Choix:'); Read(choix);
Case choix Of
'1':begin GoToXY(17,22); Write('Entrer la valeur de M1:'); Readln(M1); end;
'C','c':Effacer(False);
'T','t':Effacer(True);
'S','s':Store;
'!':Factoriel;

Salut
Tu peut fabriquer ton câble si t'en sens capable : cé très simple, il te faut des composants ordinaire comme des condensateurs, il faut juste trouver une puce spéciale (tu doit connaître, ca resemble a un mille patte) c'est un micro-contrôleur max 232 (a oui il te faut un port serie sur ton PC) c'est assez courant sur le marché.

Si tu a un fer a souder, de l'étain et les composants adéquat, il te faudra reproduire ce schéma, pour ce va sur cette page, c'est bien expliqué : http://www.casioexpert.com/interface-pc.php

Tu devrai souder ton circuit sur une carte electronique d'essai, cé super pour faire des essais : http://www.conrad.fr/...

Moi je l'ai deja fait et ca marche très bien.
Ou sinon tu peut recopier le programme sur la calculatrice mais ca t'énervera vite. (j'ai deja essayé et jai opté pour la fabrication du cable, ca prend moins la tête).
Après tu va sur le site jeuxcasio.com et tu télécharger un programme pour transmettre les donnés sur ta calculatrice. (moi j'utilise fx interface et ca marche très bien)
Cela permettra aussi de décripter le programme pour pouvoir le recopier sur la calculatrice.

Pour tes jeux, tu a le choix encore une fois sur le site jeuxcasio.com et ya un jeu qui t'intéressera peut etre, c'est une sorte de snakes regarde ici : http://www.jeuxcasio.com/viewdownloaddetails-227-Casio.html

je voulait juste avoir une différence qui existe entre langage séquencielle et langage orienté objet