0 / 0 / 0
Регистрация: 21.09.2015
Сообщений: 211
1

Найти все цифры десятичной записи числа

09.11.2015, 23:38. Показов 2392. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Найти все цифры десятичной записи числа 3^(2^(3^2)).
0
Лучшие ответы (1)
09.11.2015, 23:38
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
09.11.2015, 23:38
Ответы с готовыми решениями:

Найти все целые числа из промежутка от 10 до 200, в десятичной записи которых есть цифры “2” и “5”
Найти все целые числа из промежутка от 10 до 200, в десятичной записи которых есть цифры “2” и “5”.

Напечатать все цифры десятичной записи числа
Всем добрый вечер!Нужна ваша помощь,заранее спасибо!!! Напечатать все цифры десятичной записи числа 1!+2!+...+n!(Рекомендация:...

Найти в файле f все слова, которые представляют числа (в десятичной записи)
Найти в файле f все слова, которые представляют числа (в десятичному записи) и получить числовой файл (структурного типа) q, содержащий...

1
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
10.11.2015, 08:33 2
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Если нужно вычислить 3512 то можно так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
type ts = 0..9; //тип цифры
chislo=array[1..nmax] of ts;//массивы-числа
procedure nul(var a:chislo); //обнуление числа
var i:integer;
begin
for i:=1 to nmax do
a[i]:=0;
end;
function kol(const a: chislo):integer;//определение длины числа
var i:integer;
begin
i:=nmax;
while(a[i]=0)and(i>1) do
i:=i-1;
kol:=i;
end;
procedure mult(var a,c:chislo);//собственно умножение
var i,m:integer;
    p:0..9;
    v:byte;
begin
nul(c);
m:=kol(a);
for i:=1 to m do
 begin
  p:=0; //перенос
  v:=a[i]*3+p+c[i];//текущее число
  c[i]:=v mod 10;//пишем остаток
  p:=v div 10;//новый перенос
 end;
c[i+1]:=p;//последний перенос
for i:=1 to nmax do
a[i]:=c[i]; //запомним полученное число
end;
procedure print(var a : chislo); //печать длинного числа
var i:integer;
begin
for i:=kol(a) downto 1 do
write(a[i]);
end;
var a,b,c:chislo;i,k:integer;
begin
a[1]:=3;
b[1]:=3;
for i:=2 to 512 do
 begin
  mult(a,c);
  for k:=1 to nmax do
  a[k]:=c[k];
 end;
print(c);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
10.11.2015, 08:33
Помогаю со студенческими работами здесь

Написать все цифры десятичной записи 2^500 і 1!+2!+3!+... +100!.
Написать все цифры десятичной записи 2^500 і 1!+2!+3!+... +100!. при помощи процедур или функций. Помогите, пожалуйста.

Определить, верно ли, что в десятичной записи целого числа есть две одинаковые цифры
Ввести целое число и определить, верно ли, что в его записи есть две одинаковые цифры. (без массивов, используя функции while...do begin ,...

Найти количество различных цифр в десятичной записи числа.
Дано N(1<=N<=10^9). Найти количество различных цифр в десятичной записи числа. Количество сравнений во время исполнения программы не...

Найти наибольшую цифру в десятичной записи натурального числа
Напишите программу, которая получает с клавиатуры натуральное число и находит наибольшую цифру в его десятичной записи

Напечатать в возрастающем порядке все двузначные числа,в десятичной записи которых нет одинаковых цифр
Без массивов 1 Напишите программу вычисления суммы для n слагаемых вида (i+1) в квадрате,i=1,2,...,n. 2 Напечатать в...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Создаем SPA Router на чистом JavaScript
bytestream 17.02.2025
В современной веб-разработке одностраничные приложения (SPA) стали стандартом для создания динамичных и отзывчивых пользовательских интерфейсов. Ключевым компонентом любого SPA является роутер -. . .
Машинное обучение на TypeScript и TensorFlow
bytestream 17.02.2025
Машинное обучение становится все более востребованным направлением в современной разработке программного обеспечения. Интеграция искусственного интеллекта в веб-приложения открывает новые возможности. . .
Манипуляция данными EXIF и JPEG в JavaScript
bytestream 17.02.2025
В современном мире цифровой фотографии метаданные изображений играют важнейшую роль в организации и управлении медиаконтентом. Формат EXIF (Exchangeable Image File Format) - это стандарт,. . .
Как создать GUID/UUID в JavaScript
bytestream 17.02.2025
GUID (Globally Unique Identifier) и UUID (Universally Unique Identifier) - это специальные форматы 128-битных идентификаторов, которые практически гарантируют уникальность значения во времени и. . .
Что такое мышление в упрощенном смысле (моё субъективное видение, для создания модели).
Hrethgir 17.02.2025
Разумеется упрощать смысл есть. Дело в том, что я пришёл к тому выводу, что даже если я создам свой процессор (конвейер), то первое для чего смогу его использовать в качестве демонстративного. . .
Как Node.js устроен изнутри
Wired 17.02.2025
Node. js коренным образом изменил подход к веб-разработке, позволив использовать JavaScript не только в браузере, но и на стороне сервера. Созданный в 2009 году Райаном Далем, Node. js представляет. . .
Как обновить Node.js в Windows
Wired 17.02.2025
Думаю, многие разработчики сталкивались с ситуацией, когда устаревшая версия Node. js становилась источником проблем - от несовместимости с новыми пакетами до уязвимостей в безопасности. Особенно это. . .
Как обновить Node.js в MacOS
Wired 17.02.2025
В Node. js существует несколько подходов к обновлению, каждый из которых имеет свои преимущества и особенности применения. Выбор конкретного метода зависит от ваших потребностей - будь то. . .
Как обновить Node.js в Linux
Wired 17.02.2025
Обновление Node. js может показаться сложной задачей, особенно если у вас несколько проектов с разными зависимостями. Однако существует несколько надежных способов обновления, подходящих для разных. . .
[golang] 134. Gas Station
alhaos 17.02.2025
Тут нам даны два целочисленных слайса gas и cost, индексы массива представляют собой заправочные станции. а элементы gas это количество топлива на такой станции, cost это количество топлива. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru