opérations arithmétiques

Aller en bas

opérations arithmétiques

Message  Admin le Lun 7 Mar - 1:01

ÉNONCÉ
Ecrire un programme intitulé OPERATION, qui saisi un entier a suivi d’un opérateur parmi (+, -, *, /), suivi d’un deuxième entier b et affiche le résultat de cette opération.
L’affichage doit être sous la forme
a opérateur b = résultat

PASCAL
program operation;
uses wincrt;
var Op :char;
a,b,R :INTEGER;
begin
writeln('entrer un nombre: ');
readln(a);
writeln('entrer un opérateur parmi : *,-,/,+ ');
readln(Op);
writeln('entrer un deuxième nombre: ');
readln(b);
case Op of
'+': r:=a+b;
'-': r:=a-b;
'*': r:=a*b;
end;
if Op <> '/' then write(a,Op,b ,'=',R)else if b=0 then write ('erreur')
else write(a,Op,b,'=',a/b)
end.

Admin
Admin

Messages : 137
Date d'inscription : 29/12/2010

Voir le profil de l'utilisateur http://aidescolaire.yoo7.com

Revenir en haut Aller en bas

optimisation

Message  Admin le Lun 7 Mar - 1:03

modifiez cette solution pour qu'elle puisse détecter l'erreur dans le cas ou le caractère saisi n'appartient pas à "-","+","*","/"

Admin
Admin

Messages : 137
Date d'inscription : 29/12/2010

Voir le profil de l'utilisateur http://aidescolaire.yoo7.com

Revenir en haut Aller en bas

Revenir en haut


 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum