Дано целое число N (> 1). Найти наибольшее целое число K, при котором выполняется неравенство 3^K < N

Дано число A (> 1). Вывести наименьшее из целых чисел K, для которых сумма 1 + 1/2 + ... + 1/K будет больше A, и саму эту сумму

Дано число A (> 1). Вывести наибольшее из целых чисел K, для которых сумма 1 + 1/2 + ... + 1/K будет меньше A, и саму эту сумму

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

Как создать строку, повторяющую текст заданное число раз не используя цикл?

Как проверить является ли переменная числом?

Составить программу, которая проверяет, является ли заданное число совершенным

Совершенным числом называется, равное сумме всех своих делителей, исключая само число.

Записать тип Время, состоящий из полей: Час: 0..23; Мин, Сек: 0..59

Составить программу, вычисляющую время, прошедшее от времени t1 до t2.

Вывод чисел, отличных от введенных

Например, при вводе числа 1367 программа должна выдать числа 024589, то есть все числа, кроме тех, которые были введены.

Найти сумму цифр в числе

1 2