М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
matveydayp0cd3p
matveydayp0cd3p
01.05.2021 00:08 •  Информатика

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

надо решить на языке с++ с цикла while.

👇
Ответ:
дианка204
дианка204
01.05.2021

double a;

cin >> a;

double sum=1;

int  k=1;

while (sum<=a){

   k++;

   sum=sum+1/(k*1.0);

}

cout << k << " " << sum;

4,5(14 оценок)
Открыть все ответы
Ответ:
striletsnastya
striletsnastya
01.05.2021
Const
  m = 63;

var
arr: array[1..m] of integer;
i, j, k: integer;

begin
randomize;

write ('Исходный массив: ');
for i := 1 to m do begin
  arr[i] := random(62)+1;
write (arr[i]:4);
end;
writeln; writeln;

for i := 1 to m-1 do
for j := 1 to m-i do
if arr[j] > arr[j+1] then begin
k := arr[j];
arr[j] := arr[j+1];
arr[j+1] := k
end;

write ('Отсортированный массив: ');
for i := 1 to m do
write (arr[i]:4);

writeln;

readln
end.                                                                                                                                                                                                                                                   Ну как то так
4,8(20 оценок)
Ответ:
никкки228
никкки228
01.05.2021
1. Блок питания - Antec Basiq VP650P 650W
2. Видеокарта - MSI GeForce GTX560 Ti N560GTX-Ti Twin Frozr II
3. Джойстик - Руль + рукоятка - Genius MaxFighter F-17+Genius MaxFire Grandias (USB, 12 кнопок, кнопки Turbo и Macro, с обратной связью)+ Genius Speed Wheel 3 MT
4. Жесткий диск - HDD 750ГБ, 2.5", 5400об/мин, 8МБ, SATA II, Western Digital Scorpio Blue, WD7500BPVT
5. Звуковая карта - нет
6. Источник бесперебойного питания - ИБП Powercom WOW-700U
7. Клавиатура - Genius KB06XE(PS/2)
8. Монитор - ViewSonic VA1931wa-LED, 1366x768, 5ms
9. Мышь - Genius NetScroll 110 (оптическая, 800dpi, PS/2, Bundle, white)
10. Оперативная память - Kingston KHX1600C9D3K2/8GX 2x4GB 1600MHz
11. Привод для чтения и записи оптических дисков - нет
12. Процессор - Intel Core i5-2400 3,1GHz
13. Сетевая карта - D-Link DFE-520TX, PCIEthernet, 10/100Mbps
14. Системная плата - ASUS P8P67 EVO (REV 3.0)
15. Системный блок - Zalman Z9 Plus.
4,4(23 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ