Задать вопрос
7 февраля, 08:28

Помогите составить программу на языке программирования Pascal

В подвале школы потоп. N литров воды оказалось в зоне потопа. У учащихся, помогающих устранить потоп, имеются ведра вместимостью 12 литров. Сколько вёдер воды нужно вынести, чтобы полностью устранить потоп в школе

+4
Ответы (1)
  1. 7 февраля, 09:07
    0
    Program n1;

    var n: integer;

    begin

    readln (n);

    if n mod 12 = 0 then writeln ('надо вынести ', n div 12, ' ведер')

    else writeln ('надо вынести ', (n div 12) + 1, ' ведер');

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Помогите составить программу на языке программирования Pascal В подвале школы потоп. N литров воды оказалось в зоне потопа. У учащихся, ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы