阶梯教室的设备利用 题解,要pascal版的

作者&投稿:席浦 (若有异议请与网页底部的电邮联系)
黑匣子 题解 要Pascal版的~

这道题我也卡着,不过我有一标程看不懂你要吗

这个用最简单的模拟吧,从前往后来寻找定的人,以一为例,先加一,往后看,若有第二人人比他矮,再加一,直到有人比他高为止

var n:longint;
t1,t2:array[1..10000]of longint;
procedure qsort(l,r:longint);
var i,j,mid,temp:longint;
begin
i:=l;j:=r;mid:=t2[(l+r) div 2];
repeat
if t2[i]<mid then inc(i);
if t2[j]>mid then dec(j);
if i<=j then
begin
temp:=t1[i];t1[i]:=t1[j];t1[j]:=temp;
temp:=t2[i];t2[i]:=t2[j];t2[j]:=temp;
inc(i);dec(j);
end;
until i>j;
if l<j then qsort(l,j);
if i<r then qsort(i,r);
end;
procedure input;
var i:longint;
begin
readln(n);
for i:=1 to n do
readln(t1[i],t2[i]);
end;
procedure main;
var ans:array[0..30000]of longint;
max,i,j:longint;
begin
for i:=0 to t2[n] do
ans[i]:=0;
max:=0;
for i:=1 to n do
for j:=0 to t1[i] do
if ans[t2[i]]<ans[j]+t2[i]-t1[i] then ans[t2[i]]:=ans[j]+t2[i]-t1[i];
for i:=0 to t2[n] do
if max<ans[i] then max:=ans[i];
writeln(max);
end;
begin
input;
qsort(1,n);
main;
end.


兴安盟13776605786: 阶梯教室底下空间如何利用 -
仇由单太可: 1.往上争取 如果房屋的高度够高,可利用其高度隔出天花板夹层,搭把折叠梯,就可以做个空中储藏室了.挑高的房子更可做出夹层楼板,多出一至二间的房间.或者选择挑高衣柜到顶的设计,利用高度做储物顶柜.总而言之,在高度允许的情...

兴安盟13776605786: 已知阶梯教室共有30排座位.第一排有10个座位,从第二排开始,每排都比前一排多2个座位.问: -
仇由单太可: 解析 可以利用数列来做 首项是10,公差是2 所以 an=a1+(n-1)d =10+2(n-1) =10+2n-2=8+2n a30=8+2*30=68个座位 (2)S30=30*(a1+a30)/2=30*78/2=11701170>1150 所以可以坐下

兴安盟13776605786: 阶梯教室中的投影仪如何使用 -
仇由单太可: 用VGA视频县线连接后 需要切换的 画面切换

兴安盟13776605786: 现代教育技术在在小学教育的应用? -
仇由单太可: 现代教育技术在我校的应用 现代教育技术是广大师生实现现代远程教育的手段,随着网络技术的不断发展和网络上教学条件的日渐成熟,完整和先进的网络已成为衡量学校水平的一项重要指标.在投入大量资金完成前期硬件设备建设的同时,...

兴安盟13776605786: pascul程序设计
仇由单太可: 1) var i,s:integer; begin s:=0; for i:=1 to 100 do if i mod 5 = 0 then inc(s,i); writeln(s); end. var i,s:integer; begin s:=0; for i:=100 to 999 do if i div 100 * i div 100 + i div 10 mod 10 + i div 10 mod 10 + i mod 10 * i mod 10 = i then inc(s); writeln(s); end.

兴安盟13776605786: 我是一位新的纪检部部长,马上就要给成员开一个纪检部的开学动员大会,请有经历的告诉 -
仇由单太可: 首先看你有好多成员,15-30可以找个会议室,如果有更多的人,那最好劝你找个阶梯教室开会.利用可利用的身边所有媒体,电子白板、摄影机等,形式搞得要正规,庄严.然后就开始了:第一,先来几句开场白三分钟足矣,然后点名,看所到成员情况并记录.开始对上学期的期末情况进行良性评价,接着转向本学期的新目标,新归定等就可以合盘托出.当然中间可以请两个成员回忆一下收获什么得..最后就是结束语,要来得气奋活跃而不失庄重.音乐也就可以大声点了.中间可以把背景音乐小声放...相信你可以驾驭,找几个人做助理,就完全可以搞定...

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 星空见康网