Написать на языке vba Дано целое число А > 1. Вывести наибольшее из целых чисел К, для которых сумма 1 +1/2+1/3+ ... + 1/К < А, и саму эту сумму.

Сподіваюся, що це той текст, що тобі потрібен

Штутгарт, 14 квітня 2015 року

Шановний Артем, дякую тобі за цей лист. Я надішлю тобі фотографію мого будинку. Це сімейний будинок. Він великий. У будинку є підвал і тераса. Поруч з будинком є великий сад. Там ростуть дерева і квіти. У саду ми часто влаштовуємо пікнік в гарну погоду. Також є гараж. Будинок досить великий. На першому поверсі - вітальня, кабінет, кухня і їдальня. Тут є ванна кімната з туалетом. На другому поверсі - гостьова кімната, спальня для моїх батьків, моя кімната і кімната Лі. А в якому будинку живеш ти? Напиши мені.

З повагою, Майкл