program ideone;var a: byte;begin Writeln('Xin chào các bạn !'); writeln('Nhap gia tri a: '); readln(a); writeln('Gia trị a là:',a);end.