Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
asdfa
//fpc 3.0.0 program Serie_Tiempo; const max=100; type vector=array[1..max]of real; var serie,dif,movil:vector; n:integer; procedure Leer_Val(var n,limInf,limSup:integer); begin repeat read(n) until(n>=limInf)and(n<=limSup); end; procedure Leer_Vector(var serie:vector;n:integer); var i:integer; begin for i:=1 to n do read(serie[i]); end; procedure Mostrar begin writeln('Hello, world!'); end.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Deskripsi
ruteo
Circle
Quadratic equation
Homework 9
Бассейн-7=
IT101 - W4_1
5161
JHONATAN MARINS DA SILVA 600623806
Programa para calcular digito verificador de un RUT
Please log in to post a comment.