我理解不了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/12/01 08:42:23
xQMO@+=Bl2\(_mI]%pP"т( ,$@@~_p-y43o{3NDqN.ς(G9߷Y
BRT4T).&yq3Ic8mrT"LRJ2p)nI /cI_}b]@l>a>oZ4l8y=9* ;ZoM_d ~$W?0_I?H'6T{eTKʢA`ASfE@"Qum836pv:P&'5+Dp_p6$X{ 6nʂť֪xw4 eD:WI j}0w}