Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Pokemon2
//fpc 3.0.0 program HelloWorld; var option: integer; var pokeBall: integer; begin writeln('Tu as rencontrer un pokemon de la mort qui tue sa mere wooooa!'); pokeball := 200; writeln('Veux tu le capturer (1) ou prendre la fuite (2) ? Sachant que tu as ',pokeball ); readln(option); if(option=1) then begin pokeball := pokeball-1 ; writeln('Tu as maintenant', pokeBall,' PokeBall'); end end.
run
|
edit
|
history
|
help
0
0
solar_system_5
test01
practica 9 ejercicio 10
zadanye 3 г
Сумма пар чисел кратных и некратных 11
Подсчёт количества целочисленных точек внутри круга радиуса r
code
NguyenThanhThe11Sinh
1486