(*Cathy Ngai F.4AS *) (*the purpose of this program is change the KG to pound*) program KGtoPound; uses wincrt; var KG,P:integer; begin writeln('please enter the weight in KG'); readln(KG); P:=KG*22div10; writeln; writeln(the weight is ',P,'pound'); end. ***************************************************************** output 1