Написаиь программу на pascal ABC;
Из бюджета в 100 рублей нужно купить ручки стоимостью 34 рубля, программа должна вывести количество купленных ручек

Var a,b,c,d:real; begin writeln(Введите ваш бюджет: ); readln(a); writeln(Введите стоимость одной ручки: ); readln(b) c:=a/b; d:=trunc(c); writeln(Кол-во ручек: ,d); end.