在 pascal 中找到堆栈中编写的四个操作

添加剂结构：

d:=d+k;

调用减法结构：

d:=d-k;

调用乘法结构：

d:=d*k;

调用部门结构：

d:=d/k;

如果你在谈论递归，请打电话，然后写给你。

楼上，留下QQ

其他人都问过了，我就不抄别人的东西了，这个**，看看，

实现堆栈的：

procedure dg;

varch:char;

beginif not eoln then begin if not 在行尾 read（ch）; 读入 ch

dg;转到下一个位置。

write(ch);其余的都是输出，输出在这个位置。

end;end;

begindg;writeln;

end.Array 模拟堆栈的：

varstack:array[1..10000]of char;堆栈阵列就是堆栈。

i,n:longint;n 表示字符串的长度。

beginn:=0;

虽然不是 eoln do begin 公司（n）; 增加长度。

read(stack[n]);

end;readln;

for i:=n downto 1 do write(stack[i]);由于堆栈是先进后出的，因此它从最后一位 n 向后输出到 1。

writeln;

end.

1.不。 只是堆栈的操作有这些，需要你自己编写，以后所有的数据结构都是这样，没有已经定义的函数。 （你下面有伪函数，用人类语言描述。

没有 telement、elemtp、queueptr 等关键字。 这只是伪**。

这些仅表示数据类型，这意味着您可以使用数组、指针等数据类型实现此数据结构。

==你可以去这个**学习数据结构，里面有更多的中文解释，而且更详细*************************====如果你对算法和数据结构有任何疑问可以加我百度

1。不。

这些只是堆栈支持的操作的指令，您必须自己编写它们。 这些行动将根据情况而有所不同。

2.那是伪**，elemtp，queuetr 只是表示一种数据类型。

ELEMTP 是指针范围的数据类型，因主题而异。

queuetr 是指针，前面已经定义过了，queueptr= queuenode;

typequeueptr=^queuenode;将 queuetr 定义为指针类型。

queuenode=record

data:elemtp;

next:queueptr;下一个字段也是指针类型，因此指针存储在链状结构中。

end;linkedquetp=record

front,rear:queueptr;将前部和后部定义为指针类型。

end;

1.这些函数不能直接调用，需要自己定义函数

过程 inistack（var s：tstack），如文中所示; begin

end;2.它是伪**。

补充部分：以下老师原话：

inistack（s） gettop（s） pop（s） push（s，x） empty（s） 这5个函数可以直接使用吗？

这五个功能不应该直接使用，应该首先实现。

Telement elemtp 只是一个代号，使用时会被特定类型取代。

queueptr 是什么意思？

是指向 queueNode 的指针的类型。

yfj:31:51

element type 表示队列节点的类型。

根据问题，选择不同类型的替换。

yfj:33:07

也就是说，这只是一个代号，而不是一个可执行程序，当你真的想使用它时，选择正确的类型。

yfj:33:58

queueptr 是什么意思？

是指向 queueNode 的指针类型。

继续咨询老师......

最好在数组中定义它，这可以通过过程来完成。

保证“先进先出、后进后出”的原则就足够了。

建议使用数组仿真堆栈的实现，这样堆栈可以非常大，直接递归。

差不多就是这样。

但是，它不能用于常规检查。

如果你谈论的是数据结构的“堆栈”，只需使数组变大，如果它是“递归堆栈”，它与你的机器的性能直接相关。

楼上的这种方法在比赛期间不可用。

在程序顶部键入一行。

x 不是字母。

是一个数值。

尺寸由您自己设置。

一般来说，在NOIP比赛中，“堆栈”是不能打开的。