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