Автомат отпускает максимум N единиц товара. Известна стоимость одной единицы товара Z и сумма денег, имеющаяся у покупателя S. Сколько единиц товара может получить покупатель и какова сдача?

Question

Информатика

Артамонка

1 июня, 12:07

Автомат отпускает максимум N единиц товара. Известна стоимость одной единицы товара Z и сумма денег, имеющаяся у покупателя S. Сколько единиц товара может получить покупатель и какова сдача?

+2

Ответы (1)

Знаете ответ?

Дормедонт · Answer 1

var n, z, s, x:integer;

begin

writeln ('Vvedite N') ;

read (n) ;

writeln ('Vvedite Z') ;

read (z) ;

writeln ('Vvedite S') ;

read (s) ;

x: = (n*z) ;

writeln ('Edinis ', x div z) ;

writeln ('Sdacha ', s mod x) ;

end.