Задать вопрос
3 февраля, 15:54

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

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

+3
Ответы (1)
  1. 3 февраля, 17:38
    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 литров воды оказалось в зоне потопа. У учащихся, ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы