Паскаль. программы с циклом алкоголь вредит вашему здоровью. Бутылка пива стоит a рублей. Пустые бутылки можно сдать за b рублей. Студенты одной группы решили отпраздновать окончание сессии и собрали на всех s рублей.

Пользователь вводит три целых числа a, b и s. Программа находит, какое максимальное количество бутылок с пивом смогут купить студенты.

Например, если а=45, b=20, s=300, то ответ равен 11.

hetag15 hetag15    3   31.10.2020 14:23    0

Ответы
DoKim01 DoKim01  30.11.2020 14:25

program dchigrikova;

var a, b, s, i, o: real;

begin

write('Бутылка пива стоит - ');

readln(a);

write('Бутылку можно сдать за - ');

readln(b);

write('Количество денег на группу - ');

readln(s);

while s > a do

 begin

   i:=trunc(s/a);

   o+=i;

   s:=i*b+s-a*i;

 end;

write('ответ: ', o)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика