qingliangyou的空间 - 高等教育资讯网

邀请好友首页大学课件在线阅读知识问答教师库

空间应用

空间首页

qingliangyou

性别：

男

地区：

空间简介：

化工，计算机

十一、字符串的一般处理

1．简单加密和解密

加密的思想是：

将每个字母C加（或减）一序数K，即用它后的第K个字母代替，变换式公式： c=chr(Asc(c)+k)

例如序数k为5，这时 "A"→ "F"， "a"→?"f"，"B"→?"G"…

当加序数后的字母超过"Z"或"z"则 c=Chr(Asc(c)+k -26)

例如：You are good→ Dtz fwj ltti

解密为加密的逆过程

将每个字母C减（或加）一序数K，即 c=chr(Asc(c)-k),

例如序数k为5，这时 "Z"→"U"， "z"→"u"，"Y"→"T"…

当加序数后的字母小于"A"或"a"则 c=Chr(Asc(c)-k +26)

下段程序是加密处理：

i = 1: strp = ""

nL = Len(RTrim(strI))

Do While (i <= nL)

strT = Mid$(strI, i, 1) '取第i个字符

If (strT >= "A" And strT <= "Z") Then

iA = Asc(strT) + 5...

文章分类(默认分类)　阅读全文(427)　评论(0)　

VB程序设计的常用算法 (2012年4月2日)

八、矩阵（二维数组）运算

（1）矩阵的加、减运算

C(i,j)=a(i,j)+b(i,j) 加法

C(i,j)=a(i,j)-b(i,j) 减法

（2）矩阵相乘

（矩阵A有M*L个元素，矩阵B有L*N个元素，则矩阵C=A*B有M*N个元素）。矩阵C中任一元素 (i=1,2,…,m; j=1,2,…,n)

For i = 0 To m

For j = 0 To n

c(i, j) = 0

For k = 0 To l

c(i, j) = c(i, j) + a(i, k) * b(k, j)

Next k

Next j

Next i

（3）矩阵传置

例:有二维数组a(5,5)，要对它实现转置，可用下面两种方式：

For i=1 to 5 (2) For i=2 to 5

For j=i+1 to 5 For j=1 to i

t=a(i,j) t=a(i,j)

a(i,j)= a(j,i) a(i,j)= a(j,i)

a(j,i)=t a(j,i)=t

Next j Next j

Next i Next i

（4）求二维数组中最...

文章分类(默认分类)　阅读全文(380)　评论(0)　

VB程序设计的常用算法 (2012年4月2日)

六、查找问题

1．①顺序查找法（在一列数中查找某数x）

基本思想：一列数放在数组a(1)---a(n)中，待查找的数放在x 中，把x与a数组中的元素从头到尾一一进行比较查找。用变量p表示a数组元素下标，p初值为1，使x与a(p)比较，如果x不等于a(p)，则使p=p+1，不断重复这个过程；一旦x等于a(p)则退出循环；另外，如果p大于数组长度，循环也应该停止。（这个过程可由下语句实现）

p = 1

Do While x <> a(p) And p < =n

p = p + 1

Loop

下面写一查找函数Find，若找到则返回下标值，找不到返回0

Option Base 1

Private Function Find( a( ) As Single,x As Single) As Integer

Dim n%,p%

n=Ubound( a )

p = 1

Do While x <> a(p) And p < =n

p = p + 1

Loop

If p>n then p=0

Find=p

End Functio...

文章分类(默认分类)　阅读全文(352)　评论(0)　

VB程序设计的常用算法 (2012年4月2日)

五、排序问题

1．选择法排序（升序）

基本思想：

1）对有n个数的序列（存放在数组a(n)中），从中选出最小的数，与第1个数交换位置；

2）除第1 个数外，其余n-1个数中选最小的数，与第2个数交换位置；

3）依次类推，选择了n-1次后，这个数列已按升序排列。

程序代码如下：

For i = 1 To n - 1

imin = i

For j = i + 1 To n

If a(imin) > a(j) Then imin = j

Next j

temp = a(i)

a(i) = a(imin)

a(imin) = temp

Next I

2．冒泡法排序（升序）

基本思想：(将相邻两个数比较，小的调到前头)

1）有n个数（存放在数组a(n)中），第一趟将每相邻两个数比较，小的调到前头，经n-1次两两相邻比较后，最大的数已“沉底”，放在最后一个位置，小数上升“浮起”；

2）第二趟对余下的n-1个数（最大的数已“沉底”）按上法比较，经n-2次两两相邻比较后得次大的数；

3）依次类推，n个数共进行n-1趟比较，在第j趟中要进行n-j次两...

文章分类(默认分类)　阅读全文(488)　评论(0)　

VB程序设计的常用算法 (2012年4月2日)

算法（Algorithm）：计算机解题的基本思想方法和步骤。算法的描述：是对要解决一个问题或要完成一项任务所采取的方法和步骤的描述，包括需要什么数据（输入什么数据、输出什么结果）、采用什么结构、使用什么语句以及如何安排这些语句等。通常使用自然语言、结构化流程图、伪代码等来描述算法。

一、计数、求和、求阶乘等简单算法

此类问题都要使用循环，要注意根据问题确定循环变量的初值、终值或结束条件，更要注意用来表示计数、和、阶乘的变量的初值。

例：用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来。

本题使用数组来处理，用数组a(1 to 100)存放产生的确100个随机整数，数组x(1 to 10)来存放个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数。即个位是1的个数存放在x(1)中，个位是2的个数存放在x(2)中，……个位是0的个数存放在x(10)。

将程序编写在一个GetTJput过程中，代码如下：

Public Sub GetTJput()

Dim a(1 To 100)...

文章分类(默认分类)　阅读全文(296)　评论(0)　

他的相册

他还没有上传照片