Cho 1 số n có 2 chữ số . Tính tổng các chữ số của số đó
VD : n –> 28 tổng bằng 2+8=10
n –> 10 tổng bằng 1+0=1
Thầy cô giáo môn tin giúp em bài này với ạ
Em cảm ơn trước ạ
Cho 1 số n có 2 chữ số . Tính tổng các chữ số của số đó
VD : n –> 28 tổng bằng 2+8=10
n –> 10 tổng bằng 1+0=1
Thầy cô giáo môn tin giúp em bài này với ạ
Em cảm ơn trước ạ
uses crt;
var m: array [1..2] of word;
var so,t: integer;
begin
clrscr;
write (‘nhap so: ‘); readln (so);
m[1]:=so mod 10;
m[2]:=so div 10;
t:=m[1]+m[2];
writeln (‘tong 2 chu so la: ‘,t);
readln;
end.