Есть ответ 👍

Какой последовательность чисел даст вам вызов функции ранг 8

257
403
Посмотреть ответы 1

Ответы на вопрос:

Ladylia
4,7(53 оценок)

pascalabc.net

begin

  var n : = readinteger;

  var st : = new stack;

  while n > 0 do

  begin

    st.push(n mod 10);

    n : = n div 10

  end;

  var a : = st.println.sorted.toarray;

  println('min =', a.first, '   max =', a.last);

  println('сумма цифр =', a.sum, '   произведение =', a.product)

end.

Популярно: Информатика