Язык - Паскаль. В магазине продаётся шоколадка, стоимостью x рублей и y копеек. У нас есть a рублей b копеек. Сколько можно купить шоколадок(f)? Сколько у нас останется рублей(c)? Сколько у нас останется копеек(d)? Даю 15 баллов! Помогите, пожалуйста)))
5.Пирожок в столовой стоит a рублей и b копеек. Определите, сколько рублей и копеек нужно заплатить за n пирожков. Программа получает на вход три числа: a, b, n и должна вывести два числа: стоимость покупки в рублях и копейках.
Var x,y,a,b,c,d,f:integer; begin read(x,y,a,b); xy:=x*100+y; ab:=a*100+b; f:=ab div xy; if ab-xy*f >100 then c:=(ab-xy*f) div 100 else c:=0; d:= ab-xy*f; writeln(f,’ шоколадок можно купить, а ещё останется ‘,c,’рублей и ‘,d,’копеек.’) end.