【题目描述】
网页浏览器者有后退与前进按钮 ,一种实现这两个功能的方式是用栈 , “前进栈 ”、“后退栈 ”。
这里你需要实现以下几个功能:
BACK: 如果 “后退栈 ”为空则忽略此命令 。否则将当前两面压入 “前进栈 ”, 从“后退栈 ”中取出栈顶页面 ,并设置为当前页面 。
FORWARD: 如果 “前进栈 ”为空则忽略此命令 。否则将当前两面压入 “后 退栈 ”,从“前进栈 ”中取出栈顶页面 ,并设置为当前页面 。
VISIT: 将当前页面压入 “后退栈 ”、并将当前页面 置为指定,并将 “前 进栈 ”置空 。
QUIT: 退出。
假设此浏览器初始页面为 http://www.acm.org/
【输入格式】
输入为一系列命令: BACK, FORWARD, VISIT和 QUIT,页面网址为不含空 ,页面网址为不含空 ,页面网址为不含空 ,页面网址为不含空 ,页面网址为不含空 ,页面网址为不含空 格的字符串
假设任一时刻意两个栈中的元素都不会超过 100。
最后一个命令为 QUIT。
【输出格式】
输对于除 QUIT外所有命令,输出当前页面(网址)
如果该命令被忽略则输出 “Ignored”。
【样例输入】
VISIT http://acm.ashland.edu/
VISIT http://acm.baylor.edu/
BACK
BACK
BACK
FORWARD
VISIT http://www.ibm.com/
BACK
BACK
FORWARD
FORWARD
FORWARD
QUIT
【样例输出】
http://acm.ashland.edu/
http://acm.baylor.edu/
http://www.acm.org/
Ignored
http://acm.ashland.edu/
http://www.ibm.com/
http://acm.ashland.edu/
http://www.acm.org/
http://acm.ashland.edu/
http://www.ibm.com/
Ignored
【样例解释】
无。
【数据范围与规定】
对于 100%的数据, 操作数量不超过 1000,每行字符串长度不超过 500。
【题解】
太简单了,不多说,模拟。
【代码】
var
s,ss:string;
cs:string;
l,r,i:longint;
ins,del:array [0..1001] of string;
procedure back;
begin
if l=0 then
begin
writeln('Ignored');
exit;
end;
inc(r); ins[r]:=ss;
ss:=del[l]; dec(l);
writeln(ss);
end;
procedure forwar;
begin
if r=0 then
begin
writeln('Ignored');
exit;
end;
inc(l); del[l]:=ss;
ss:=ins[r]; dec(r);
writeln(ss);
end;
procedure visit;
begin
r:=0;
inc(l); del[l]:=ss;
ss:=copy(s,i+1,length(s)-i);
writeln(ss);
end;
begin
l:=0; r:=0;
ss:='http://www.acm.org/';
readln(s);
while s<>'QUIT' do
begin
cs:=''; i:=1;
while (s[i]<>' ') and (i<=length(s)) do
begin
cs:=cs+s[i]; inc(i);
end;
if cs='BACK' then back;
if cs='FORWARD' then forwar;
if cs='VISIT' then visit;
readln(s);
end;
end.