var
a,b,c:array[1..300] of longint;
x,t,i,j,n,m,y:longint;
begin
readln(n);
for i:=1 to n do
begin
readln(a[i],x,y);
b[i]:=a[i]+x+y;
c...
Pascal 奖学金1．奖学金 (scholar.pas／c／cpp) 【问题描述】 某小
var
a,b,c:array[1..300] of longint;
x,t,i,j,n,m,y:longint;
begin
readln(n);
for i:=1 to n do
begin
readln(a[i],x,y);
b[i]:=a[i]+x+y;
c...