Составьте программу для определения сдачи после
покупки в магазине перчаток стоимостью А р.,
портфеля стоимостью В р. и галстука стоимостью С
р., если на покупку выделено D р. Все исходные
данные задаются с клавиатуры.

Паскаль.

===PascalABC.Net===

program ;

var

  a, b, c, d :integer;

begin

 WriteLn('Программа оределяет сдачу после покупки.');

 Write('Введите стоимость перчаток: ');

 ReadLn(a);

 Write('Введите стоимость портфеля: ');

 ReadLn(b);

 Write('Введите стоимость галстука: ');

 ReadLn(c);

 Write('Введите количество выделенных денег: ');

 ReadLn(d);

 Write('Ваша сдача составила: ', d - a - b - c);

end.