我理解不了s:=s+n mod 10;和 n:=n div 10;varn,s:longint;beginread(n);s:=0;while n0 dobegins:=s+n mod 10;n:=n div 10;end;writeln(s);end.pascal
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/30 22:46:13
![我理解不了s:=s+n mod 10;和 n:=n div 10;varn,s:longint;beginread(n);s:=0;while n0 dobegins:=s+n mod 10;n:=n div 10;end;writeln(s);end.pascal](/uploads/image/z/13335108-60-8.jpg?t=%E6%88%91%E7%90%86%E8%A7%A3%E4%B8%8D%E4%BA%86s%3A%3Ds%2Bn+mod+10%EF%BC%9B%E5%92%8C+n%3A%3Dn+div+10%3Bvarn%2Cs%3Alongint%3Bbeginread%28n%29%3Bs%3A%3D0%3Bwhile+n0+dobegins%3A%3Ds%2Bn+mod+10%3Bn%3A%3Dn+div+10%3Bend%3Bwriteln%28s%29%3Bend.pascal)
我理解不了s:=s+n mod 10;和 n:=n div 10;varn,s:longint;beginread(n);s:=0;while n0 dobegins:=s+n mod 10;n:=n div 10;end;writeln(s);end.pascal
我理解不了s:=s+n mod 10;和 n:=n div 10;
var
n,s:longint;
begin
read(n);
s:=0;
while n0 do
begin
s:=s+n mod 10;
n:=n div 10;
end;
writeln(s);
end.
pascal
我理解不了s:=s+n mod 10;和 n:=n div 10;varn,s:longint;beginread(n);s:=0;while n0 dobegins:=s+n mod 10;n:=n div 10;end;writeln(s);end.pascal
先学习这两点:
1、mod是求余运算,15 mod 10 结果是5
2、div是求除10 之后的结果,如果n是整数,那么n除10之后结果只保留整数部分,52 div 10结果是5
不能理解的话你找个数比如说n=123,代进去,把每步结果写下来就知道了