Синформатикой 7 класс (паскаль, условный оператор) : запрашивается стоимость книги и внесённая оплата, если оплата совпадает со стоимостью, то пишется "". если оплата меньше, то пишется "добавьте денег". если оплата больше стоимости то пишется "возьмите сдачу" и сумма сдачи.

Program oplata;
var a,b:integer; 
 begin 
writeln('Введите  стоимость '); 
readln(a); 
writeln('Введите  оплату '); 
readln(b); 

          else  if a>b then writeln('добавьте денег')
                           else writeln('возьмите сдачу')
end.