Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
fini
//fpc 3.0.0 program HelloWorld; var number1: integer; var number2: integer; var answer: integer; var option: string; begin writeln('Bienvenue dans la calculatrice!'); writeln('Choisis un option:'); writeln('1. Addition'); writeln('2. Soustraction'); writeln('3. Multiplication'); writeln('4. Division'); writeln('5. Sortir'); readln (option); if (option = '1') then begin writeln('Quel est ton premier nombre?'); readln(number1); writeln('Quel est ton deuxième nombre?'); readln(number2); answer := number1 + number2; writeln('Le résultat vaut ',answer,'!'); end else if (option = '2') then begin writeln('Quel est ton premier nombre?'); readln(number1); writeln('Quel est ton deuxième nombre?'); readln(number2); answer := number1 - number2; writeln('Le résultat vaut ',answer,'!'); end else if (option = '3') then begin writeln('Quel est ton premier nombre?'); readln(number1); writeln('Quel est ton deuxième nombre?'); readln(number2); answer := number1 * number2; writeln('Le résultat vaut ',answer,'!'); end else if (option = '4') then begin writeln('Quel est ton premier nombre?'); readln(number1); writeln('Quel est ton deuxième nombre?'); readln(number2); answer := number1 div number2; writeln('Le résultat vaut ',answer,'!'); end else if (option = '5') then begin exit; end end.
run
|
edit
|
history
|
help
0
Promedio con aprobación
practica 7 ejercicio B3
Урок 3 задача 10 (1483) два момента времени
Dd
Opdracht_1
08 Ariketa REPEAT
Menukar nilai2
test5
practica 2 ejercicio 4
Количество пар кр и некр 11 улучшенный алгоритм