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 ạ
1 câu trả lời
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.
