Question

Запишите программу на языке Паскаль данную задачу: Летом килограмм клубники стоит 80 рублей. Мама купила 3 кг 500 г клубники. Сколько рублей сдачи она должна получить с 1000 рублей?

Answer 1

begin

   writeln('Сдача с 1000р при покупке 3 кг и 500г по цене 80 за кг = ', (1000 - (3.5 * 80)):2:2);

end.

Answer 2

Вот программа на языке Паскаль, которая решает данную задачу:

pascalCopy code
program CalculateChange;
var
  costPerKg: real;   // Цена за килограмм клубники
  weightKg: real;    // Вес клубники в килограммах
  paidAmount: real;  // Сумма, заплаченная мамой
  change: real;      // Сдача
  
begin
  costPerKg := 80.0;      // Цена за килограмм клубники
  weightKg := 3.5;        // Вес клубники в килограммах
  paidAmount := 1000.0;   // Сумма, заплаченная мамой
  
  // Вычисляем общую стоимость клубники
  // Цена за килограмм умножается на вес в килограммах
  // (3 кг 500 г = 3.5 кг)
  totalCost := costPerKg * weightKg;
  
  // Вычисляем сдачу
  change := paidAmount - totalCost;
  
  // Выводим результат на экран
  writeln('Сумма сдачи: ', change:0:2, ' рублей');
  
end.

Вы можете скопировать этот код в среду разработки Pascal и запустить его, чтобы узнать, сколько рублей сдачи должна получить мама.