PASCAL问题高手来,紧急。100分啊

来源:百度知道 编辑:UC知道 时间:2024/05/10 05:57:38
运用集合类型元素不相同的特点,解:
从键盘上输入任意一些大小写字母,输出刚才输入的字母,输出时字母不重复,而且只有大写字母(大小写同时出现,或小写出现,都只输出大写)。

假设这样输入

先输入一个数N,表示有N个字母
在一个一个输字母

var s:set of char;
c:char;
n,i:integer;
begin
readln(n); {字母总数N}
s:=[]; {集合赋孔值}
for i:=1 to n do begin
readln(c); {读字母}
s:=s+[c]; {加入集合,若已经有,则自动并入}
end;
for c:='A' to 'z' do if c in s then write(c); {集合特有的输出方式}
end.

还有什么不懂吗?