1樓：網友
題目可以看一下嗎？
pascal誰拿了最多獎學金我錯哪了？求救！
2樓：o逸水之寒
我是tyvj的站長。
雖然很想要你的10分，但還是希望您自己除錯程式，除錯程式是乙個能力的訓練。
我給你我的程式吧。
你可以參考。
typetxt=record
name:string;
qm:longint;
py:longint;
gb:char;
xb:char;
lw:longint;
sum:longint;
end;var
n,i,j,k,max,p,code,sumx:longint;
a:array[0..100] of txt;
s:string;
beginreadln(n);
for i:=1 to n do
beginreadln(s);
p:=pos(' ',s);
a[i].name:=copy(s,1,p-1);
delete(s,1,p);
p:=pos(' ',s);
val(copy(s,1,p-1),a[i].qm,code);
delete(s,1,p);
p:=pos(' ',s);
val(copy(s,1,p-1),a[i].py,code);
delete(s,1,p);
a[i].gb:=s[1];
a[i].xb:=s[3];
delete(s,1,4);
val(s,a[i].lw,code);
a[i].sum:=0;
if (a[i].qm>80) and (a[i].lw>=1) then inc(a[i].sum,8000);
if (a[i].qm>85) and (a[i].py>80) then inc(a[i].sum,4000);
if (a[i].qm>90) then inc(a[i].sum,2000);
if (a[i].qm>85) and (a[i].xb='y') then inc(a[i].sum,1000);
if (a[i].py>80) and (a[i].gb='y') then inc(a[i].sum,850);
if a[i].sum>max then
begink:=i;
max:=a[i].sum;
end;inc(sumx,a[i].sum)
end;writeln(a[k].name);
writeln(a[k].sum);
writeln(sumx);
end.
pascal 誰拿了最多獎學金 哪錯了？？
3樓：網友
for i:=1 to n do
with a[i] do readln(name,x,y,s,t,z);
此題陸悄握難點就在讀入運租部分，你這樣的讀就無法正確讀入。我3天前做的開始也是這樣。。
正解在我baidu空間有。。調早慶試通過的。
誰拿了最多獎學金 noip pascal
4樓：網友
照你補充的這麼說，應該是 編譯錯誤。
free pascal 經常這樣～
5樓：網友
什麼錯，錯誤**是什麼？
pascal誰拿了獎學金?
6樓：網友
誰拿了最多講學金？ 字串處理 只要會讀入就行了。
free pascal （誰拿了最多獎學金）
7樓：ice璐璐
這是一道水題……
就是乙個乙個地套。
不用二維陣列 就用兩個一維陣列（汗）
但是這是必須的。
NBA誰的紋身最多，NBA中紋身最多的是誰
nba中紋身最多是丹尼斯 羅德曼 他全身的紋身超過60處，除版了 沒有經過紋身外，其他地方遍佈著大大小權小的紋身。丹尼斯 羅德曼 dennis rodman 1961年5月13日出生於美國新澤西州的特倫頓，美國職業籃球運動員，司職大前鋒，綽號是 大蟲 應該是艾佛森吧28處 nba中紋身最多的是誰 i...
NBA中誰的分最多，NBA得分最多的人是誰？
威爾特 張伯倫，費城勇士，紐約尼克斯，1962.3.2 100分 籃球皇帝 威爾特 張伯倫 wilton norman chamberlain 1936年8月21日 1999年10月12日 是一位美國的籃球運動員。曾效力於nba的費城 舊金山勇士 金州勇士隊 費城76人隊和洛杉磯湖人隊 畢業於堪薩斯...
NBA誰的得分最多
nba歷史總得分榜 截止2015 2016賽季常規賽2015年11月2日 北京時間 比賽結束後 名次 姓名 得分 備註 1 卡里姆 阿布杜爾 賈巴爾 38387 2 卡爾 馬龍 36928 3 科比 布萊恩特 32534 現役洛杉磯湖人隊 4 邁克爾 喬丹 32292 5 威爾特 張伯倫 31419...