作业帮 > 综合 > 作业

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

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/07/14 21:44:42
输入一个正整数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.