Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Homework 1
var x:integer; begin readln(x); if x>0 then begin x:=x+1; writeln('x=',x); end else begin writeln('x=',x); end end.
run
|
edit
|
history
|
help
0
Mengulang kalimat n kali
temp
practica 1 ejercicio 5
Elevador Versão Pascal StringList
1 4 6
formato_real
lala
test27
test27
1