Даны действительное а и натуральное n. Вычислить 1+1/2+1/3+1/4+...+1/n.

Ответы:

Илья Гутт

17-11-2018 07:26

//PascalABC.netvar n,i:integer; a:real;begin a:=0; // Для PascalABC.net обнулять переменную a не обязательно readln(n); for i:=1 to n do a:=a+1/i; writeln(a);end.

Также наши пользователи интересуются:

Запишите дробь с существительным 60 Каковы функции желудка

Картинка с текстом вопроса от пользователя Ангелина Мельниченко

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Даны действительное а и натуральное n. Вычислить 1+1/2+1/3+1/4+...+1/n.» от пользователя Ангелина Мельниченко в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!