js也有趣。

<html> <head> <title>找最接近的数</title> <meta charset="utf-8"> </head> <body > <p> 问题描述:有一堆若干金条,从中任选几条,使其重量之和与另一给定的数量最接近。 </p> <br> <script> var v=new Array(); var a=new Array(); var r_value=new Array(); var n=parseInt(prompt("总共的金块条数有:","")); for (...
学习档案 | 2020-10-24 22:17 | 阅读 1333 次 | 评论 2 条

ds18b20-1602测温

#include<reg51.h> #define uchar unsigned char #define uint unsigned int sbit DQ=P2^4;//temp sbit RS=P2^6; sbit RW=P2^5; sbit EN=P2^7; uchar code str1[]={" temperature: "}; uchar code str2[]={""}; uchar data disdata[5]; uint tvalue; uchar tflag; ...
单片机 | 2020-03-30 21:47 | 阅读 2049 次 | 评论 2 条

单片机音频

#include <REGX52.H> sbit speaker=P2^1; unsigned char timer0h,timer0l,time; //定义每个音阶的长度的数组 《世上只有妈妈好》 code unsigned char song_mother[]= { 6,2,3,5,2,1 ,3,2,2,5,2,2, 1,3,2,6,2,1,5,2,1, 6,2,4,3,2,2, 5,2,1, 6,2,1, 5,2,2, 3,2,1 ,2,2,1,1,2,1, 6,1,1,5,2,1, 3,2,1 ,2,2,4, 2,2,3, 3,2,1, 5,2,2, 5,...
单片机 | 2019-12-15 14:31 | 阅读 1821 次 | 评论 0 条

欢度春节

http://www.qunxingw.wang/happy_new_year.phphttp://www.qunxingw.wang/happy_new_year.php
学习档案 | 2019-02-04 14:57 | 阅读 1074 次 | 评论 0 条

动态规划,求值并找具体位置

递归实现 动态规划 并找出一个最优解 从V中选一些数据,使之和与另一给定值j最接近,(不大于j)对于V中的某个元素,用选或不选进行分析,选用此数时放右子树 不选时放左子树,并进行递归 。 # -*- coding:utf-8-*- ###从V中选一些数,使之和与另一给定值j 最接近(不大于j)。 动态规划时,对于V中的某个元素,选或不选进行递归,选此数时放右子树,不选放左子树 ###利用二叉树递归处理,动态规划 v ,并把每个右子树的值保存在的r_list中。 v=[1...

提取表数据

Sub m_loss() Dim d_m, r, r_loss As Integer Dim date_new As Date r = Range("a65536").End(xlUp).Row r_loss = Sheets("LOSS").Range("a65536").End(xlUp).Row zyname = InputBox("請輸入廠名") d_m = Int(InputBox("請輸入月份date_m")) '注意數據轉換  2003,2007 好像版本不一樣 Sheets("LOSS").Cells(r_loss + 4, 1) = zyn...
VBA | 2018-10-05 16:43 | 阅读 1317 次 | 评论 0 条

vba formula 的带变量引用使用 多表汇总

Sub ai_insurance() cr = Range("c65536").End(xlUp).Row Set crng = Range(Cells(1, 3), Cells(cr, 3)) Dim arr(13) As Integer For Each c In crng Select Case Left(c, 2) Case "1月" arr(1) = c.Row Case "2月" arr(2) = c....
VBA | 2018-09-30 09:50 | 阅读 5026 次 | 评论 4 条

vscode

微软收购 GitHub ,开源vscode。让我看到了他转到了正确的方向!
杂文 | 2018-09-17 15:18 | 阅读 1233 次 | 评论 0 条

vba_date

Sub mydate_deal() Dim r_max, r_min, r As Integer r_max = Range("b65500").End(xlUp).Row r_min = Range("k65500").End(xlUp).Row y = Year(Now()) dm = Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31) If ((y Mod 400 = 0) Or (y Mod 4 = 0 And y Mod 100 <> 0)) Then dm(1) = 29 ...
VBA | 2018-09-06 15:28 | 阅读 1395 次 | 评论 0 条

绘图

<html> <head> <meta charset=utf-8" /> <title>canvas</title> </head> <body> <canvas id="myCanvas" width="300" height="300" style="border: 1px solid #d3d3d3;"> your bolowr is not draw! </canvas> <script> var c=document.getElementById("myCanvas"); var ctx=c.getContext("2d"); ...

爬虫

# _*_ coding:utf-8_*_ import requests from bs4 import BeautifulSoup import re def download_page(url): headers = {"User-Agent": "Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:61.0) Gecko/20100101 Firefox/61.0"} r = requests.get(url, headers=headers) return r.content def get_...
python | 2018-08-25 19:24 | 阅读 1346 次 | 评论 1 条

RSA

1,求模的运算: (m1.m2)%n=(m1%n.m2%n)%n 2,幂运算优化:M^e%n 如果 e偶数,就变为: ((M^e/2)%n. (M^e/2)%n)%n 其他 :(M^(e-1)%n.M%n)%n <html> <head> <meta charset="utf-8"/> <title> RSA 加密,解密 </title> </head> <body> <script> //e.d=(p-1)(q-1)K+1; //求密钥d; function pri_key(e,p,q...
学习档案 | 2018-06-17 12:49 | 阅读 1309 次 | 评论 0 条

php页面乱码问题

可能存在如下几个方面的问题: 一般的中文编码:gb2312或者gbk(前者的一种扩展),这两种编码缺乏国际通用性,属于中文编码;UTF-8为国际标准编码,一般网页编码使用该编码方式;比如,一般源码都提供 gbk utf-8的2种源码供用户下载试用。 出现乱码大部分是由于编码方式的不一致导致的,其中主要有四个地方不一致就可能存在这个可能:1、页面文件的编码方式(.html,.php等);2、 html.head中指定浏览器的编码方式;3、MySql数据库传输的编码方式;数据库设置的编码方式的错误4、Apache字符集。 解决方法:修...
php | 2017-10-15 12:43 | 阅读 1262 次 | 评论 0 条

多表查询

select u.name_id,u.phone,u.username,sum(i.inmoney)-sum(o.outmoney) as balance from users u inner join table_in i on u.name_id=i.name_id join table_out o on u.name_id=o.name_id group by o.name_id,i.name_id ;
sql | 2017-10-09 21:58 | 阅读 1231 次 | 评论 0 条

JSON示例

<html> <head> <meta charset="utf-8"/> <title> 我爱学英语 </title> <style type="text/css"> #btn{ width:100px; height:33px; background-color:green; } #english{ color:red; } #chinese{ color:#94AAD6; } span{ font-size:40px; font-align:center; } p{ padding-top:10px; wi...

virtualenv win cmd下建立虚拟环境

virtualenv win cmd下建立虚拟环境 ...>pip virtualenv (安装) ...>virtualenv myvenv (新建) ...>cd myvenv ...>cd scripts ...>activate.bat (myvenv)...> (进入了虚拟环境状态) ....>de...
学习档案 | 2016-12-26 17:32 | 阅读 2023 次 | 评论 0 条

django 安装

一,python3.6 安装 ,环境变量配制,本来是很简单的。但因之前有JAVA的变量配制,变量名path 此时python3.6在win10下会自动配制,但有一个坑,此时自动的是PATH大写。千辛万苦后来才发现是这个原因配制不成功。更改时又不小心误删了所有path的参数。惨得很。 二、PIP安装 在我们安装了python之后,只要是版本不是太落后,都会自带安装一个pip,在安装完python3.6之后,已经安装好了pip3,我们可以在终端中输入pip3,如果安装成功,会有信息输入出。 ...
python | 2016-11-22 23:13 | 阅读 1950 次 | 评论 0 条

ADT "Unexpected value from nativeGetEnabledTags: 0"

LOG里大量出现 "Unexpected value from nativeGetEnabledTags: 0" 在logcat的过滤器的log message字段中输入以下过滤串 ^(?!.*(nativeGetEnabledTags)).*$
android | 2016-09-11 10:17 | 阅读 4187 次 | 评论 0 条

生活备忘录(android io 的小应用)

public class MainActivity extends Activity { String PASS = "myPassWord.txt"; Button addbtn, readbtn, modifybtn, savebtn; EditText addet, modifyet; TextView tv; ScrollView sv; @Override protected void onCreate(Bundle savedInstanceState) { super.onCreate(savedInstanceState); s...
android | 2016-08-27 18:43 | 阅读 3804 次 | 评论 0 条

k金回收小助手

public class MainActivity extends Activity { private TextView tv1, tv2, tv3, tv4, tv5, tv6, tv7, tv8, tv9, tv10, tv11, tv12, tv13, tv14; private EditText et1, et2, et3; private Button bt1; @Override protected void onCreate(Bundle savedInstanceState) { super.onCreate(savedIns...
android | 2016-08-21 18:56 | 阅读 2665 次 | 评论 0 条
浏览231953次
最新评论