Написаиь программу на 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.