谁是跑得最快的兔子PASCAL
谁是跑得最快的兔子PASCAL
日期：2011-04-02 19:16:21 人气：1
很简单啦，读入一个就进行“打擂台”，最后输出max所对应的名字。代码如下：
var
n,i:longint;
a,b,c:real;
namei,max:string;
begin
readln(n);
c:=0;
for i:=1 to n do begin
readln(namei);
readln(a,b);
if a/b>c then begin
c: