pascal中如何将输入的一个单词的各个字母分解

发布网友发布时间：2024-10-24 13:33

共1个回答

热心网友时间：2024-11-04 15:30

var
a:string;
b:char;
n,i:integer;

begin
readln(a);
n:=length(a);
for i:=1 to n do
writeln(a[i]);
readln;
end.

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com