Есть ответ 👍

Перевести числа из 10-й системы счисления в 7-ю, 15-ю системы счисления следующее число: 728

117
347
Посмотреть ответы 2

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

tinita15
4,8(16 оценок)

  в 7-ю будет   2060в  15-ю  будет  338
nastya2735
4,4(62 оценок)

Решение с использование длинной арифметики. var   i, j, n, len, rem: integer;   a: array[1..200] of byte; begin   write('введите число: ');   read(n);   len : = 1;   a[1] : = 1;   for i : = n + 1 to 99 {100} do   begin       for j : = 1 to len do       begin           rem : = a[j] * i + rem;           a[j] : = rem mod 10;           rem : = rem div 10;       end;       while rem > 0 do       begin           inc(len);           a[len] : = rem mod 10;           rem : = rem div 10;       end;   end;   writeln('произведение чисел из интервала (', n, '; 100): ');   for i : = len downto 1 do write(a[i]); end. пример работы программы: введите число: 1 произведение чисел из интервала (1; 100): 1948348720420644788695888257080283249381963823594360049498643927185579338215778728274424636079639781709574621897447185108592230400000000000000000000

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