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

Question

Информатика

Санюта

1 мая, 09:43

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

+4

Ответы (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.