Объяснение:
const h = 24;
c = 5;
var s,k:integer;
begin
write('Введите сумму, которую Вы готовы потратить: ');
read(s);
k := (s div h) + (s div h div c);
write('Количество шоколадок: ',k);
end.
program z1;
var s,h,k:integer;
begin
write('Введите сумму, которую готовы потратить: ');
readln(s);
write('Введите стоимость 1 шоколадки: ');
readln(h);
k:=s div h;
write('ответ: ',k,' + ',k div 5,' в подарок = ');
k:=k+k div 5;
write(k,' шоколадок')
end.
Объяснение:
картинка
Вводим сумму, которую готовы потратить, и стоимость 1 шоколадки
Вычисляем сколько можем купить шоколадок на эту сумму
Вычисляем сколько шоколадок получим вместе с подарочными
Выводим общее количество шоколадок
