var
bread_amount, bread_price, milk_amout, milk_price: integer;
begin
writeln('Введите кол-во булок хлеба:');
readln(bread_amount);
writeln('Введите цену одной булки:');
readln(bread_price);
writeln(' ');
writeln('Введите кол-во бутылок молока:');
readln(milk_amout);
writeln('Введите цену одной бутылки:');
readln(milk_price);
writeln(' ');
writeln('За ', bread_amount, 'б хлеба и ', milk_amout, 'б молока вы заплатите ', bread_amount*bread_price + milk_amout*milk_price, 'руб');
end.