var a,b,tich,thuong:integer;
begin
write('a=');readln(a);<br />write('b=');readln(b);<br />tich:=a*b;<br />thuong:=a/b;<br />write('tich cua a va b la:',tich);
write ('thuong cua a va b la:',thuong);
readln;
end.
chúc bạn học tốt