Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Tri 1.0
//fpc 3.0.0 program HelloWorld; var number1: integer; number2: integer; number3: integer; one,two,three: integer; answer: string; yes: string; begin writeln('Bienvenue dans le tri automatique !'); writeln('Vous allez choisir 3 nombres qui vont être automatiquement triés par l''ordinateur, let''s go !'); writeln('Quel est ton nombre 1 ?'); readln(number1); writeln(number1); writeln('Quel est ton nombre 2 ?'); readln(number2); writeln(number2); writeln('Quel est ton nombre 3 ?'); readln(number3); writeln(number3); writeln('Beep beep...'); writeln('Tes nombres sont maintenant triés:'); if(number2<number3) and (number2<number1)then begin one:= number2; two:= number3; three:= number1; writeln(one, ' ', two, ' ', three); end; writeln(''); writeln('Veux-tu recommencer ?'); writeln(answer); readln(answer); begin if(answer='oui')then writeln('Quel est ton nombre 1 ?'); readln(number1); writeln(number1); writeln('Quel est ton nombre 2 ?'); readln(number2); writeln(number2); writeln('Quel est ton nombre 3 ?'); readln(number3); writeln(number3); writeln('Beep beep...'); writeln('Tes nombres sont maintenant triés:'); if(number3<number2) and (number2<number1)then end; end.
run
|
edit
|
history
|
help
0
2;3
НОД всеми способами
zadacha4
Tri 1.0
hh
bai1
test04
practica 3 ejercicio B7
Урок 2 задача не из учебника
JHONATAN MARINS DA SILVA 600623806