Составить программу паскаль по

один киловатт электроэнергии стоит r рублей. на 1 стирку расходуется s киловатт.

сколько можно , если стирать только в выходные (в выходные

электроэнергия дешевле на 30%) и все белье можно постирать за 3 стирки?

===== PascalABC.NET =====

begin

 var R := ReadReal('Стоимость 1 квт-ч, руб:');

 var S := ReadReal('Расход энергии на одну стирку, квт-ч:');

 var РасходБудни := 3 * S * R;

 var Экономия := 0.3 * РасходБудни;

 Println('Экономия, руб:', Round(Экономия, 2))

end.