profile
Размещено 5 лет назад по предмету Информатика от CoolBat

После обучения Архимед и Эратосфен переписывались еще много лет. Помогите определить, сколько денег нужно заплатить за отправку бандероли в древней Греции, если известно, что за бандероль весом до 50 грамм взимается 10 драхм (дренегреческая валюта), а за каждые следующие полные или неполные 50 грамм еще по 5 драхм.

Напишите программу, вычисляющую, какое наименьшее число монет по 10, 4 и 1 драхме надо заплатить за отправку бандероли весом w грамм.(Free Pascal)

  1. Ответ на вопрос
    Ответ на вопрос дан 140201
    на PascalABC.NET
    ------------------------

    program aaa;
    const n=50;
    var w, c, x, d10, d4, d1: integer; 
    begin 
      writeln ('Введите вес бандероли');
      readln (w);
      if w <= n
        then c:=10
        else  
           if w mod n = 0
              then c:=10+((w div n)-1)*5
              else c:=10+5+((w div n)-1)*5;
     
      d10:= c div 10;
      d4:= (c-10*d10) div 4;
      d1:= (c-d10*10-d4*4);
     
      writeln ('стоимость бандероли: ',c,' драхм');
      writeln;
      writeln ('для оплаты нужно не менее');
      writeln (d10:10,' монет по 10 драхм');
      writeln (d4:10,' монет по 4 драхмы');
      writeln (d1:10,' монет по 1 драхме');
    end.    

    ------------------
    Результат работы программы:

    Введите вес бандероли     100

    стоимость бандероли: 15 драхм

    для оплаты нужно не менее
              1 монет по 10 драхм
              1 монет по 4 драхмы
              1 монет по 1 драхме
    1. Ответ на вопрос
      Ответ на вопрос дан CoolBat
      Спасибо большое!
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.