Question

Написать программу (в паскале ) . Определить сдачу после покупки булки хлеба и двух пакетов молока .

Answer 1

program Kassa;

var cash, bread, milk, cost, cashback: integer;

begin

writeln('Цена молока: ');

readln(milk);

writeln('Цена хлеба: ');

readln(bread);

writeln('Внесено денег: ');

readln(cash);

cost := milk + bread;

if cash < cost

then begin writeln('Недостаточно средств!'); end

else begin cashback := cash - cost; writeln('Сдача: ',cashback); end

end.

Answer 2

Конечно! Вот пример программы на Pascal, которая определяет сдачу после покупки булки хлеба и двух пакетов молока:

pascalCopy code
program CalculateChange;

var
  totalCost, amountPaid, change: real;
  
begin
  writeln('Введите общую стоимость покупки: ');
  readln(totalCost);
  
  writeln('Введите сумму, которую вы заплатили: ');
  readln(amountPaid);
  
  change := amountPaid - totalCost;
  
  if change >= 0 then
  begin
    writeln('Ваша сдача: ', change:0:2);
    writeln('Спасибо за покупку!');
  end
  else
  begin
    writeln('Извините, но вам не хватает денег.');
  end;
  
  readln;
end.

Программа запрашивает общую стоимость покупки (булки хлеба и двух пакетов молока) и сумму, которую вы заплатили. Затем она вычисляет сдачу, вычитая стоимость покупки из суммы, которую вы заплатили. Если сдача положительная или равна нулю, программа выводит сумму сдачи и благодарит вас за покупку. В противном случае, если сдача отрицательная (вы заплатили меньше, чем стоимость покупки), программа выводит сообщение о недостаточности денег.

Надеюсь, эта программа поможет вам! Если у вас есть еще вопросы, не стесняйтесь задавать.