function[tiendien]=pt(a)

clc

if a<=50

disp('tien dien phai tra la:')

tdien=a*700

elseif a<=100

disp('tien dien phai tra la:')

tdien=((a-50)*1000)+(50*700)

elseif a>100

disp('tien dien phai tra la:')

tdien=((a-100)*1500)+(50*700)+(50*1000)

end

return;