Run Code
|
API
|
Code Wall
|
Users
|
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
Please
log in
to post a comment.
test27
1000 digits of π and requires a version of Pascal with a longint data type (32-bit integer).
4546
Вычисление e^x с помошью ряда Тейлора
111
test07
Poukimone1 tg
OLEG-02oct2017
virtuelna ravan-preklapanje krugova
sumar 2 valores
Please log in to post a comment.