输入一个正整数N(注意:根据输入的N的值,来判断N的位数),用while语句输出它的各位数字.pascal 语言

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/25 21:47:33
输入一个正整数N(注意:根据输入的N的值,来判断N的位数),用while语句输出它的各位数字.pascal 语言

输入一个正整数N(注意:根据输入的N的值,来判断N的位数),用while语句输出它的各位数字.pascal 语言
输入一个正整数N(注意:根据输入的N的值,来判断N的位数),用while语句输出它的各位数字.
pascal 语言

输入一个正整数N(注意:根据输入的N的值,来判断N的位数),用while语句输出它的各位数字.pascal 语言
program long;
var i,n:integer;
begin
readln(n);
while n0 do
begin
write(n mod 10,' ');
n:=n div 10;
end;
writeln;
end.