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

Question

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

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

Гость

Ответ(ы) на вопрос:

Accepted Answer

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