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

    Написать программу для Pascal.
    Найти произведение цифр числа введенного с клавиатуры.

    • Автор:

      hectorstephens
  • Ответ:

    var n, p: integer;begin  read(n);  p := 1;  repeat    p := n mod 10 * p;    n := n div 10;  until n = 0;  write(p)end.
    • Отвечал:

      mohamedbifb

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