Найти трёхзначное число, которое первым встретится дважды - QBasic

  1. Найти трёхзначное число, которое первым встретится дважды Условие задачи 1. Дан ряд чисел ln2, ln3, ln4, ln5, ln6, ln7, ... (длина не определена) то есть количество чисел вы должны взять столько, сколько нужно для решения задачи 2. Этот ряд преобразуется в следующий ряд по алгоритму. Поскольку числа вещественные, то надо после десятичной точки взять три цифры, которые образуют в общем случае трёхзначное натуральное число. 3. Эти числа и образуют новый ряд 4. Теперь надо найти в этом ряду такое число, которое первым встретится (считая с самого начала) два раза ... Вывести на экран это число и его местонахождение (два места)


textual

Код к задаче: «Найти трёхзначное число, которое первым встретится дважды - QBasic»

CLS
DIM a(1000), b(1000, 10)
k = 1
DO
d = LOG(k)
c = INT((d - INT(d)) * 1000)
a(c) = a(c) + 1: b(c, a(c)) = k
k = k + 1
LOOP UNTIL a(c) = 2
PRINT c; b(c, 1); b(c, 2);

СДЕЛАЙТЕ РЕПОСТ

9   голосов, оценка 4.000 из 5



Похожие ответы
  1. Найти число, сумма делителей которого в три раза больше самого числа (Само число к делителям не относится) Программа нашла наименьшее из таких чисел - 30240 примечание Тут бейсику пришлось посчитать. Вероятнее всего он никогда не найдет числа, сумма делителей которого в 4 раза, (в 5 раз) больше самого числа...

  1. нужна помощь в решении ) Дано натуральное число,верно ли,что это число k-значное?

  1. Решить задачу тремя способами:1) через цикл for 2) через цикл с предусловием while 3) через цикл с постусловием do until Задача: Найти на отрезе [n; m] натуральное число, имеющее наbбольшее количество делителей!

  1. дано натуральное число. определить, сколько раз в нем встречается максимальная цифра.

  1. Даны два натуральных числа А и В. Если А делится нацело на В или В делится нацело на А,то вывести на экран 1 (единицу), а иначе вывести любое другое число (условный оператор, операторы цикла, массивыи литерные величины не использовать). Дано натуральное число n(n<28). Найти все трехзначные числа, сумма цифр которых равна n. Операции деления, целочисленного деления и нахождения остатка не использовать. Дано натуральное число N, которое вводится с клавиатуры. Получить новое натуральноечисло, заменив все четные цифры исходного числа числом K (К – вводится с клавиатуры). Например:N=1233473 и К=5 Ответ: М=1533573

  1. Дано N-значное натуральное число. Вывести число, полученное из исходного перемещением K первых цифр в конец числа.

  1. В тексте зашифровано число, цифры которого разбросаны. Восстановить это число.

  1. Подскажите, надо написать программу, в которой надо будет ввести максимальное число, затем она должна убрать все вторые числа в этом диапазоне, и так, пока не останется лишь одно число. Далее его надо вывести на экран.