Question

Задача Автомат продает шоколадки одного вида. Покупатель вносит денежные средства в купюроприемник. Автомат выдает ему шоколадку и сдачу, если денег достаточно, и сообщает о том, что средств недостаточно, в противном случае. Создайте алгоритм и напишите программу на Паскале для работы данного автомата

Answer 1

Ответ:

var a,b:integer;

begin

writeln('Шоколадка стоит 10 копеек');

writeln('Введите сколько денег вы хотите внести');

readln(a);

b:=a-10;

if b>=0 then

writeln('Вот ваша шоколадка(ваша сдача=',b,')')

else

writeln('У вас недостаточно средств')

end.