Выведите последовательность операции (не более 30) для получения числа X по заданному алгоритму

@Inkar1990 · Регистрация: 11.12.2015

Author24 — интернет-сервис помощи студентам

у вас имеется число 0 и две операции с данным числом. первая операция mul позволяет умножить данное число на 10, вторая операция add позволяет прибавить число 1. выведите последовательность операции для получения числа х. выведите не более 30 операций.
выведите последовательность операции mul,add для получения числа х

@иван я · 11.12.2015, 10:05

Inkar1990, вы сами то свое задание поняли?

@Cyborg Drone · 18.12.2015, 08:28

Не по теме:

Задание как задание.

Пояснение.

Допустим, n = 234.

0: add add mul = 20
20: add add add mul = 230
230: add add add add = 234

Pascal

var n: longint;
    k, i, j: byte;
    d: array [1..10] of byte;
 
begin
  for i := 1 to 10 do d[i] := 0;
  repeat
    write('n >= 0;  n = ');
    readln(n)
  until n >= 0;
  k := 0;
  while n > 0 do
    begin
      inc(k);
      d[k] := n mod 10;
      n := n div 10
    end;
  for i := k downto 1 do
    begin
      for j := 1 to d[i] do write('add ');
      if i > 1 then writeln('mul ')
    end;
  readln
end.

Только вот 30 операциями далеко не всегда можно обойтись.

@Inkar1990 0 / 0 / 0 Регистрация: 11.12.2015 Сообщений: 2
		1
	Выведите последовательность операции (не более 30) для получения числа X по заданному алгоритму 11.12.2015, 09:03. Показов 1361. Ответов 2 Метки нет (Все метки) у вас имеется число 0 и две операции с данным числом. первая операция mul позволяет умножить данное число на 10, вторая операция add позволяет прибавить число 1. выведите последовательность операции для получения числа х. выведите не более 30 операций. выведите последовательность операции mul,add для получения числа х 0

@иван я 17 / 17 / 16 Регистрация: 15.12.2012 Сообщений: 536
	11.12.2015, 10:05	2
	Inkar1990, вы сами то свое задание поняли? 0

	18.12.2015, 08:28

Выведите последовательность операции (не более 30) для получения числа X по заданному алгоритму

Решение