Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Mengubah biner ke desimal
Program biner_ke_desimal; var i,t,m:int64; x:string; begin readln(x); t:=1; for i:=length(x) downto 1 do begin if (x[i]='1') then m:=m+t; t:=t*2; end; writeln(m); end.
run
|
edit
|
history
|
help
0
nomer5
BubbleSort (standaard)
матрица из шариков
kepo
IT101 - W4_1
practica 11 ejercicio 1
janja - naloga 2 - 9.2.2011
pdp-34-onecompiler
practica 8 ejercicio 1
Сумма квадратов чисел = n