Написать программу, которая в зависимости от введенного количества минут (M <= 60) будет подставлять слово минута

Можно использовать mod без div:

program minutes;var m: integer;beginwrite(\'Введите число минут (от 1 до 60)\');readln(m);case m mod 10 of0, 5, 6, 7, 8, 9: writeln(m, \' минут\');1: writeln(m, \' минута\');2, 3, 4: writeln(m, \' минуты\')endend.

Можно использовать div без mod:

program minutes;var m, k: integer;beginwrite(\'Введите число минут (от 1 до 60):\');readln(m);k := m - (m div 10) * 10;case k of0, 5, 6, 7, 8, 9: writeln(m, \' минут\');1: writeln(m, \' минута\');2, 3, 4: writeln(m, \' минуты\')endend.