Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
10
var n:integer; function binar(l,r:integer):integer; var x:integer; begin if r-l=1 then begin if r*r<=n then write(r) else write(l); exit; end; x:=(l+r) div 2; if x*x>n then binar(l,x) else if x*x<n then binar(x,r) else binar:=x*x end; begin read(n); write(binar(1,n)); end.
run
|
edit
|
history
|
help
0
task 2
считалочка05
Сумма пар чисел кратных и некратных 11 с дельтой неэффективная
простые от 1 до 100
Решето Эратосфена
imprimir_numeros_hasta_N
f1
Задача 2 урок не из учебника
Calcula média de pesos, o maior peso, o menos peso
Why does not work?