uses crt;
var a, tien: real;
b: integer;
const ship= 10000;
begin
clrscr;
write ('Gia tien cua mat hang:'); readln(a);
write ('So luong hang:'); readln(b);
tien := (a*b) + ship;
writeln ('So tien can thanh toan:', tien:10:3);
readln;
end.