program bai_giai;
uses crt;
var n,k,m:longint;
begin
clrscr;
write('nhap n:');readln(n);
k:=n mod 10;
m:=n div 10;
writeln('chu so hang don vi la:',k);
writeln('chu so hang chuc la:',m);
writeln('tich cua chu so hang chuc va chu so hang don vi la:',k*m);
readln;
end,