• Вопрос по информатике:

    Дано целое двухзначное число. Используя операции div и mod, найти произведение его цифр. Для облегчения поиска решения

    • Автор:

      eli8
  • Вариант с проверкой вводимого числа:

    program product;var n: integer;beginn:=100;writeln(\'Bведите двузначное целое число\');while (n>99) or (n<10) dobeginReadln(n);if (n<10) or (n>99) then writeln(\'Это не двузначное число. Введите двузначное\')end;Writeln(\'Произведене цифр введенного числа: \', (n mod 10) * (n div 10))end.

    Программа без проверки вводимого числа:

    program product;var n: integer;beginwriteln(\'Bведите двузначное целое число\');Readln(n);Writeln(\'Произведене цифр введенного числа: \', (n mod 10) * (n div 10))end.

    • Отвечал:

      kaeshbk

    Ответов нет, но ты это испарвиш!