黑客X档案官方论坛's Archiver

q6138914 发表于 2008-7-7 07:11

回复 1# 的帖子

想想看看。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。我顶

zhousisi09 发表于 2008-7-7 08:54

下来看看。学习下.共同进步.共同发展::01::

aqirui1993 发表于 2008-7-8 09:36

.................................::07::

361656340 发表于 2008-7-8 13:18

我比菜鸟海菜   
  就是想学
可惜啊    父母不理解

光影 发表于 2008-7-8 18:52

没权限,回个贴……

4545852 发表于 2008-7-13 11:55

好帖。。。。。跟跟跟`````````````````

welcomeqqqqqq 发表于 2008-7-16 13:40

看看::01:: ::01::

xizi12304 发表于 2008-7-16 15:37

新手。学习一下。嘿嘿。。。

xx290805296 发表于 2008-7-23 13:38

支持

::04:: ::04:: ::04:: ::04:: ::04::

cainiaoheike 发表于 2008-7-23 14:29

问下 学习C编程书应该买什么?::08:: ::08::

dtxyz166 发表于 2008-7-25 14:34

好啊,你那个显示ip的怎么弄啊?

duguyue100 发表于 2008-7-25 22:05

用pascal来一下,别说我捣乱啊!
program ex;
  type ping : record
          pin : real;
          one : real;
          two : real;
          three : real;
          four : real;
          name : string;
        end;
  procedure sort;
    var i,j  : longint;
    begin
      for i:=1 to 10 do
        for j:=10 downto i+1 do
          if a[j-1].pin<a[j].pin then
            begin
              a[0]:=a[j-1];
              a[j-1]:=a[j];
              a[j]:=a[0];
            end;
  var a : array[0..10] of ping;
       i,j,k,n,s : longint;
  begin
    for i:=1 to 10 do readln(a[i].name,a[i].one,a[i].two,a[i].three,a[i].four);
    for i:=1 to 10 do a[i].pin:=(a[i].one+a[i].two+a[i].three+a[i].four)/4;
    sort;
    writeln(a[1].name);
  end.
仔细看下题竟然还有科目的比较,累死了,不写了,呵呵,就这么多,献丑了

11330 发表于 2008-7-26 17:16

支持下  在研究C了```

唯爱X小白 发表于 2008-7-27 16:00

看看  拿来学习下 ::13::

YuFer 发表于 2008-8-1 22:31

这个是C语言书上用的最多的初学者例子
用不着隐藏吧?:face18

shenqiang2416 发表于 2008-8-2 18:37

看看结果

俺不懂想看看
大哥原谅!::11:: ::11:: ::11::

黑色的枫叶 发表于 2008-8-2 19:33

学习学习

黑色的枫叶 发表于 2008-8-2 19:34

学习学习::01::

心随£缘动 发表于 2008-8-3 00:34

看看,学习下!!!!!

dianzi 发表于 2008-8-3 08:21

see see 我们上学期的课程设计题就是这个!

页: 1 2 3 4 [5] 6 7 8 9 10 11 12 13 14


Powered by Discuz! 6.1.0  © 2001-2007 Comsenz Inc.