freesoft 发表于 2007-8-21 07:47:41

编程马拉松(9)

基础的东西差不多了,结构体是程序设计中很重要的东西。从今天开始。
引自第八阁论坛:http://bbs.chinadbg.cn/forum-7-1.html
飞翔技术论坛:http://www.powk.net/bbs/forumdisplay.php?fid=4&page=1
建立成绩单,为了方便,建立,学号,姓名,语文,数学,平均分几项就行了。用结构体完成。
前面几贴有朋友说快了点。真正写程序是从这里开始。结构体和类,在程序的是很重要的,可以大大的减少代码量工这块会用一定数量的题来练习。前面的知道只是为了让大家知道一些基本的东西。函数,变量,循环, 数组,指针。我是这样认为,如果有不对的请指证

freesoft:C++代码:


#include <iostream>
#define renshu 5
using namespace std;
struct stu
{
      int num;
      int yuwen;
      int shuxue;
      char name;
      float pingjun;
};
void main()
{
      //int renshu;
      //cin>>renshu;
      struct stu list;
                        cout<<"学号 姓名 语文 数学\n";
      for(int i=0;i<renshu;i++)
      {
                cin>>list.num>>list.name>>list.yuwen>>list.shuxue;
                list.pingjun=list.yuwen+list.shuxue;
      }
      for(i=0;i<renshu;i++)
      {
                cout<<"学号:"<<list.num
                        <<"姓名:"<<list.name
                        <<"语文:"<<list.yuwen
                        <<"数学:"<<list.shuxue
                        <<"平均分:"<<list.pingjun/2
                        <<"\n";
      }

}

天圆地方:DELPHI

procedure TForm1.Button1Click(Sender: TObject);
type
TStu=Record
   Id:integer;
   Name:String;
   Chinese:real;
   Math:real;
   Aver:real;
end;
var
Stu:array of TStu;
StuNum,i:integer;
TmpChinese,TmpMath,TmpAver:string;
begin
StuNum:=StrToInt(InputBox('输入','请输入班级人数:','5'));
SetLength(Stu,StuNum);
for i:=0 to StuNum-1 do
begin
   Stu.Id:=StrToInt(InputBox('输入','学生'+IntTostr(i+1)+'学号:','9724612'+inttostr(i+1)));
   Stu.Name:=InputBox('输入','学生'+IntTostr(i+1)+'姓名:','张三');
   Stu.Chinese:=StrToFloat(InputBox('输入','学生'+IntTostr(i+1)+'语文成绩:','8'+inttostr(i+1)));
   Stu.Math:=StrToFloat(InputBox('输入','学生'+IntTostr(i+1)+'数学成绩','8'+inttostr(i+1)));
   Stu.Aver:=(Stu.Chinese+Stu.Math)/2;
end;
for i:=0 to StuNum-1 do
begin
    TmpChinese:=FloatToStr(Stu.Chinese);
    TmpMath:=FloatToStr(Stu.Math);
    TmpAver:=FloatToStr(Stu.Aver);
    showmessage(format('学号%d; 姓名%s; 语文%s; 数学%s; 平增均分为:%s',.Id,Stu.Name,TmpChinese,TmpMath,TmpAver]));
end;
end;
页: [1]
查看完整版本: 编程马拉松(9)