
#include<stdioh>
const int n=5;
struct student
{
long num;
char name[10];
int score[3];
float avr;
};
int main(void)
{
//这里定义了N个学生信息
struct student stu[N];
//下面的数据用来存储过程变量值
int i,s=0,j,h;
//
double aver;
//定义3个最大值和和值,用来分别统计3门课程的最大值和总分
int max[3],sum[3];
//这里用来读入学生信息
printf("Pls enter your Info,as :2007 aaa 97 98 99\n");
for(i=0;i<N;i++)
{
scanf("%ld %s %d %d %d",&stu[i]num,stu[i]name,&stu[i]score[0],&stu[i]score[1],&stu[i]score[2]);
}
//下面是用来显示输入的用户信息
for(i=0;i<N;i++)
{
printf("%d\t%s\t%d\t%d\t%d\t%f\n",stu[i]num,stu[i]name,stu[i]score[0],stu[i]score[1],stu[i]score[2],(10(stu[i]score[0]+stu[i]score[1]+stu[i]score[2]))/3);
}
//获取到每科成绩的最大值,并输出最高者的信息。也输出每科的最高平均成绩
for(j=0; j<3; ++j)
{
max[j] = 0;
sum[j] = 0;
for(i=0;i<N;i++)
{
if(stu[i]score[j]>max[j])
{
max[j]=stu[i]score[j];
h=i;
}
sum[j] += stu[i]score[j];
}
printf("The first class_Info is that:\n");
aver = 10sum[j]/N;
printf("\tThe Aver is %lf\n", aver);
printf("\tThe Highest Score is:%d \n\tThe Score Highest stu info is :%d %s %d\n",max[j], stu[h]num,stu[h]name,stu[h]score[j]);
}
return 0;
}
Dim a() As Variant
Private Sub Combo1_Click()
Label1FontName = Combo1Text
Label2FontName = Combo1Text
End Sub
Private Sub Combo2_Click()
Label1FontSize = Val(Combo2Text)
Label2FontSize = Val(Combo2Text)
End Sub
Private Sub Form_Activate()
a = Array(24, 13, 45, 37, 59, 61, 78, 96, 89, 47, 18, 65, 79, 14, 62, 85, 43, 91, 97, 42)
For i = LBound(a) To UBound(a)
Label1Caption = Label1Caption + CStr(a(i)) + Space(1)
If (i + 1) Mod 5 = 0 Then Label1Caption = Label1Caption + vbCrLf
Next i
End Sub
Private Sub Form_Load()
Dim i As Integer
Combo1Clear
For i = 0 To ScreenFontCount - 1
Combo1AddItem ScreenFonts(i)
Next
Combo1Text = "请选择字体"
For i = 8 To 20
Combo2AddItem i
Next i
Combo2Text = "请选择字号"
End Sub
Private Sub Option1_Click()
Label2Caption = ""
Dim b()
b = a
For i = LBound(b) To UBound(b) - 1
For j = i + 1 To UBound(b)
If b(j) < b(i) Then
t = b(i)
b(i) = b(j)
b(j) = t
End If
Next j
Next i
For i = LBound(b) To UBound(b)
Label2Caption = Label2Caption + CStr(b(i)) + Space(1)
If (i + 1) Mod 5 = 0 Then Label2Caption = Label2Caption + vbCrLf
Next i
End Sub
Private Sub Option2_Click()
Dim b(), FindNum As Integer, Flag As Boolean
FindNum = InputBox("请输入要查找的数:", "查找")
b = a
Flag = False
For i = LBound(b) To UBound(b)
If b(i) = FindNum Then
Label2Caption = "a(" & i + 1 & ")=" & FindNum
Flag = True
Exit For
End If
Next i
If Not Flag Then
Label2Caption = "数组中没有" & FindNum & "这个数。"
End If
End Sub
Private Sub Option3_Click()
Label2Caption = ""
Dim b(), Flag As Boolean, Counter As Integer
b = a
For i = LBound(b) To UBound(b)
Flag = True
For j = 2 To Sqr(b(i))
If b(i) Mod j = 0 Then
Flag = False
Exit For
End If
Next j
If Flag Then
Counter = Counter + 1
Label2Caption = Label2Caption + CStr(b(i)) + Space(1)
If Counter Mod 5 = 0 Then Label2Caption = Label2Caption + vbCrLf
End If
Next i
End Sub
#include <windowsh>
//读bmp需要两个结构
#pragma pack(push, enter_defBM, 1) //指定内存对齐单位为1。
typedef struct tagBmpFileHeader
{
WORD bfType; // 文件类型 BM
DWORD bfSize; // 文件大小
WORD bfReserved1; // 保留字
WORD bfReserved2; // 保留字
DWORD bfOffBits; // 位图的数据信息离文件头的偏移量
} BFH;
typedef struct tagBmpImgHeader
{
DWORD biSize; // 表示本结构的大小,0X28
LONG biWidth; // 位图的宽度
LONG biHeight; // 位图的高度
WORD biPlanes; // 位面数永远为1
WORD biBitCount; // 位图的位数
DWORD biCompression; // 压缩类型
DWORD biSizeImage; // 表示位图数据区域的大小
LONG biXPelsPerMeter; // 表示显示设备的水平分辨率
LONG biYPelsPerMeter; // 表示显示设备的垂直分辨率
DWORD biClrUsed; // 实际使用的颜色数目
DWORD biClrImportant; // 重要的颜色数量
} BIH;
#pragma pack(pop, enter_defBM) //恢复默认内存对齐单位。
#define HDIB HANDLE // 位图句柄
DWORD WINAPI DIBNumColors(BYTE data)
{
WORD wBitCount;
DWORD dwClrUsed = ((BIH )data)->biClrUsed;
if (dwClrUsed != 0) return (WORD)dwClrUsed;
wBitCount = ((BIH )data)->biBitCount;
return 1 << wBitCount;
}
WORD WINAPI PaletteSize(BYTE data)
{
return (WORD)(::DIBNumColors(data) sizeof(RGBQUAD));
}
BYTE WINAPI FindDIBBits(BYTE data)
{
return (data + (DWORD )data + ::PaletteSize(data));
}
// 获取Bmp的宽度
DWORD FAR DIBWidth(const BYTE data)
{
BIH pbmi;
pbmi = (BIH )data;
if(pbmi->biSize == sizeof(BIH)) return pbmi->biWidth;
else return -1;
}
// 获取Bmp的高度
DWORD FAR DIBHeight(const BYTE data)
{
BIH pbmi;
pbmi = (BIH )data;
if(pbmi->biSize == sizeof(BIH)) return pbmi->biHeight;
else return -1;
}
// 从文件读取Bmp图像数据
HDIB WINAPI ReadDIBFile(FILE fp)
{
BFH bmf;
HDIB hDIB;
BYTE pData;
rewind(fp);
if(fread(&bmf, sizeof(BFH), 1, fp) != 1) return NULL; // 文件读取错误
if(bmfbfType != 19778) return NULL; // 文件类型错误
hDIB = (HDIB) ::GlobalAlloc(GMEM_MOVEABLE | GMEM_ZEROINIT, bmfbfSize); // 为DIB分配内存
if (hDIB == 0) return NULL; // 内存分配失败。
pData = (BYTE )::GlobalLock((HGLOBAL) hDIB); // 锁定
if(fread(pData, 1, bmfbfSize - sizeof(BFH), fp) != (bmfbfSize - sizeof(BFH))) // 文件读取错误
{
::GlobalUnlock((HGLOBAL) hDIB); // 解除锁定
::GlobalFree((HGLOBAL) hDIB); // 释放内存
return NULL;
}
::GlobalUnlock((HGLOBAL) hDIB); // 解除锁定
return hDIB; // 返回DIB句柄
}
BOOL WINAPI PaintDIB(HDC hDC, int posX, int posY, HDIB hDIB)
{
BYTE pDIBHd; // BITMAPINFOHEADER指针
BYTE pDIBBits; // DIB象素指针
BOOL bSuccess = FALSE; // 成功标志
HPALETTE hPal = NULL; // DIB调色板
//HPALETTE hOldPal = NULL; // 以前的调色板
if (hDIB == NULL) return FALSE; // 判断DIB对象是否为空
pDIBHd = (BYTE ) ::GlobalLock((HGLOBAL) hDIB); // 锁定DIB
pDIBBits = ::FindDIBBits(pDIBHd); // 找到DIB图像象素起始位置
::SetStretchBltMode(hDC, COLORONCOLOR); // 设置显示模式
// 调用SetDIBitsToDevice()来绘制DIB对象
bSuccess = ::SetDIBitsToDevice(hDC, // hDC
posX, posY,
((BIH )pDIBHd)->biWidth, // nDestWidth
((BIH )pDIBHd)->biHeight, // nDestHeight
0, // SrcX
0, // SrcY
0, // nStartScan
(WORD)DIBHeight(pDIBHd), // nNumScans
pDIBBits, // lpBits
(LPBITMAPINFO)pDIBHd, // lpBitsInfo
DIB_RGB_COLORS); // wUsage
::GlobalUnlock((HGLOBAL) hDIB); // 解除锁定
return bSuccess;
}
// 打印位图信息
VOID WINAPI PrintDIBInfo(HDIB hDIB)
{
BYTE pDIBHd = (BYTE )::GlobalLock((HGLOBAL) hDIB);
BIH pbmi = (BIH )pDIBHd;
const char lp[] =
{
"位图信息长度: %d\n",
"位图图像大小: %dx%d\n",
"位面数:%d\n",
"位图颜色深度: %d\n",
"位图数据压缩类型: %d\n",
"位图数据区域大小: %d\n",
"位图分辨率: 水平 %d dpi, 垂直 %d dpi\n",
};
printf("Windows V3 cBitmapInfoHeader 信息\n\n");
printf(lp[0], pbmi->biSize);
printf(lp[1], pbmi->biWidth, pbmi->biHeight);
printf(lp[2], pbmi->biPlanes);
printf(lp[3], pbmi->biBitCount);
printf(lp[4], pbmi->biCompression);
printf(lp[5], pbmi->biSizeImage);
printf(lp[6], (LONG)(pbmi->biXPelsPerMeter 00254f + 05f), (LONG)(pbmi->biYPelsPerMeter 00254f + 05f));
::GlobalUnlock((HGLOBAL) hDIB); // 解除锁定
}
int main(int argc, char argv[])
{
HDIB x;
FILE fp = fopen("1bmp", "rb");
if(fp==NULL) return -1;
x = ReadDIBFile(fp);
printf("DIB handle %u", x);
PaintDIB(GetDC(NULL), 0, 0, x);
PrintDIBInfo(x);
return 0;
}
一直有在学习如何使用python处理数据和绘图,作为有机化工人士,本来就很多体力话,最近测了不少数据,最好的态度当然是测完立刻处理,其中处理起来最麻烦的就是一个荧光寿命的拟合了。
不过还是得夸一下本组用的horiba的荧光仪,软件集成了origin,荧光寿命部分也有相对应的拟合软件,在测试时就可以直接看拟合结果,快速简便,但是这个拟合软件呢,由于版权问题,自己个人电脑上不能安装,拿到原始数据了还是得自己拟合自己处理,这个一直用origin搞也是心烦意乱,且不说某次我搞着搞着origin就崩了,那么,从头再来,你们懂的。
总而言之,就试着用python写了程序,以后在自己电脑上也能随时查看基本的拟合结果。
程序如下:
此处的数据处理方式中,源数据的强度要经过取对数和归一化。取对数过程中,会出现count为0的数据,无法取对数,在程序中是将其直接删除,这个与origin中进行了对比,所采取的方式是一样的。至于归一化,采取的是最为简单的[0,1]之间的归一化,利用最大值和最小值来进行的。
而x值,主要是通过将channel转化为时间,且曲线中要下降的第一个点,是x轴必须对应为0的,以此进行拟合。
上述的程序可以如origin一样处理数据,但是根据事后与在自带的数据分析软件里呈现出的结果,是有不一样的。
上述程序的还需要解决的问题有:
1 有多个寿命值时,要如何根据拟合参数计算单个寿命。
2 如何做到自由取部分值进行来进行拟合。
3 取所有有效值进行拟合时,我有一个文件是三个指数都无法拟合,这与自带分析软件很不一样。
具体的后续更改待更新。
以上就是关于(2).编写程序处理若干个学生的信息,每个学生的信息包括:学号、姓名、三门成绩及平均分。要求从键盘输全部的内容,包括:(2).编写程序处理若干个学生的信息,每个学生的信息包括:学号、姓名、三门成绩及平均分。要求从键盘输、求vb代码!!! 一、题目:设计一个数据处理程序 二、目的与要求: 1.、用C语言编写程序处理图片bmp文件 1.读取图片的宽度,高度,每个像素所需的位数,水平分辨率,垂直等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)