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

Предыдущий
вопрос Следующий
вопрос

program StrawberryPurchase;
var
pricePerKg, strawberryWeight, moneyGiven, totalCost, change: real;
begin
pricePerKg := 80;
strawberryWeight := 3.5; // kg
moneyGiven := 1000;
totalCost := pricePerKg * strawberryWeight;
change := moneyGiven - totalCost;
writeln('Total cost of strawberries: ', totalCost:0:2, ' rubles');
writeln('Change: ', change:0:2, ' rubles');
end.

Результат выполнения программы:
Total cost of strawberries: 280.00 rubles
Change: 720.00 rubles