{Bài 11: Viết chương trình tính tổng một số có 3 chữ số.}
program tong3chuso;
uses crt;
var a,x1,x2,x3,tam: integer;
begin
clrscr;
write('Nhap so co 3 chu so: '); readln(a);
x1:= a div 100;
tam:= a mod 100;
x2:= tam div 10;
x3:= tam mod 10 ;
writeln('Tong cac chu so la: ',x1+x2+x3);
readln;
end.