Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program Calculatrice;
- var firstnumber: real;
- var secondnumber: real;
- var choice: real;
- var result: real;
- begin
- writeln('Bienvenue dans la calculatrice !');
- writeln('Choisis une option:');
- writeln('1. Addition');
- writeln('2. Soustraction');
- writeln('3. Multiplication');
- writeln('4. Division');
- writeln('5. Sortir');
- readln(choice);
- if (choice=5) then
- begin
- writeln('Ciao Boloss !');
- exit;
- end;
- if (choice>5) then
- begin
- writeln('Au revoir cher utilisateur');
- exit;
- end;
- writeln('Quel est ton premier nombre?');
- readln(firstnumber);
- writeln('Quel est ton deuxième nombre?');
- readln(secondnumber);
- if (choice=1) then
- begin
- result:= firstnumber + secondnumber
- end;
- if (choice=2) then
- begin
- result:= firstnumber - secondnumber
- end;
- if (choice=3) then
- begin
- result:= firstnumber * secondnumber
- end;
- if (choice=4) then
- begin
- result:= firstnumber / secondnumber
- end;
- writeln('Le résultat vaut: ',result:1:3, '!');
- end.
Advertisement
Add Comment
Please, Sign In to add comment