определить сумму трех цифр пятизначного числа

Программа считает сумму последних трех цифр:

Pascal:

var n:longint;

sum, i:integer;

begin

repeat

write ('N = ') ;

readln (n) :

until (n>=10000) and (n<=99999) ;

sum:=0;

for i:=1 to 3 do

begin

sum:=sum + (n mod 10) ;

n:=n div 10;

end;

writeln ('Summa: ', sum) ;

end.

C++:

#include

using namespace std;

int main ()

{

int n, sum = 0;

do

{

cout <<"N = ";

cin >>n;

}

while (n99999) ;

for (int I = 1; I<=3; I++)

{

sum+=n%10;

n/=10;

}

cout <<"Summa: " <
return 0;

}