Какое наименьшее число почтовых марок стоимостью 10.4 и 1 руб. надо наклеить на бандероль,вес которой М грамм? Плата за посылку вычисляется следующим образом: за бандероль весом до 50 г взимается 10 руб., за каждые следующие полные или неполные 50 г - еще по 5 руб.

Есть ответ
18.12.2022
353

Ответ


program while;

var m,s,d,ch,od:integer;

begin

writeln ('Vvedit m');

readln (m);

 if (m0) then begin

 m:=m-50;  s:=10; 

while m>0 do begin

m:=m-50;

s:=s+5; 

end;

d:=s div 10; s:=s-d*10;

ch:=s div 4; s:=s-ch*4;

od:=s;

end; 

writeln ('10-',d,' 4-',ch,' 1-',od); 

readln

end. {делал без проверки в паскале} 

 


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.