Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
1
var s, x, n: integer; begin s := 100*s + x; n := 1; while s < 2021 do begin s := s + 5*n; n := n + 1 end; writeln(n) end.
run
|
edit
|
history
|
help
1
test_03
Стандартные функции в паскале round, trunc, int, frac
AUMENTAR O DISMINUIR EDADES
practica 1 ejercicio 8
test22
Operaciones 2 grado
nested for loop a(ii)
ariketa 09
practica 7 ejercicio B5
Tri1