Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
SmallQuest
program SmallQuest; // Type: Texte // String // Type: Numérique (nombre entier) // Byte (EN) = Octet (FR) 1111 1010 > Ex: 25 ou 35 ou 234 ou ... // Integer > 32 767 > Ex: 25 000 ou 945 ou 29 871 ou ... // LongInt > 2 147 483 647 > Ex: 25 367 894 ou 1 364 257 693 ou ... // Type: Numérique (nombre réel, à virgule) // Double ou Extended > Ex: 3.14 // Un octet (byte) peut aller de 0 à 255 // 0000 0000 > 0 // 1111 1111 > 255 var name, unicorn: string; var year: byte; // Valeur qui peut aller de 0 à 255 begin writeln('Bienvenue cher aventurier dans la classe enchantée!'); writeln('Tout d''abord, comment t''appelles-tu?'); readln(name); writeln('Bien le bonjour ', name); writeln('Dis moi, quel âge as-tu?'); readln(year); writeln('Tu as donc ', year, ' ans...'); writeln('Tu as donc l''âge requis pour avoir ta première monture!'); writeln('Aimes-tu les licornes?'); readln(unicorn); if (unicorn = 'Oui') then begin writeln('Super! Je te présente Fluffy, enjoy! :)'); end else begin writeln('Non? Je t''envoie directement chez le dragon alors, good luck!'); end end.
run
|
edit
|
history
|
help
0
String compare
2;3
ds
3
practica 9 ejercicio 7
считалочка05
aefrt
bilete
cond basico 1
Урок 4 задача 4: решить в целых числах уравнение ax=b