比赛 ZLXOI2015Day1 评测结果 AAEEEEEEEE
题目名称 虐狗大赛 最终得分 20
用户昵称 Ten.X 运行时间 0.740 s
代码语言 Pascal 内存使用 0.20 MiB
提交时间 2015-10-29 09:43:54
显示代码纯文本
var kk,q,n,i,j,k,ii,jj:longint;
a,h,d:array[1..10005]of longint;
begin
assign(input,'thebigmatch.in');
assign(output,'thebigmatch.out');
reset(input);
rewrite(output);
read(n);
for i:=1 to n do
read(h[i]);
for i:=1 to n do
read(d[i]);
read(q);
for i:=1 to q do
begin
read(kk);
if kk=1 then
begin
for j:=1 to n-1 do write(h[j],' ');write(h[n]);end
else
begin
read(ii,jj,k);
for j:=ii to jj do
h[j]:=h[j]-(k-d[j]);
end;
end;
close(input);
close(output);
end.