我理解不了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;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,代进去,把每步结果写下来就知道了