Var x,k,p:integer; {k-сколько отдал за карандаши, p -сколько за тетради}
begin
read(x,k,p);
Writeln("Стоимость покупки: ",k+p," сдача: ",x-(k+p));
end.
Var x,k,p:integer; {k-сколько отдал за карандаши, p -сколько за тетради}
begin
read(x,k,p);
Writeln("Стоимость покупки: ",k+p," сдача: ",x-(k+p));
end.