Даны действительное a и натуральное n. Вычислить: 1 + 1/2 + 1/3 +1/4 + … + 1/n;
Даны действительное a и натуральное n. Вычислить: 1 + 1/2 + 1/3 +1/4 + … + 1/n;
Гость
Ответ(ы) на вопрос:
Гостьpascal for i:=1 to n do a=a+1/n; writeln(a); если не сработает измени i:=1 на i:=0 я не занимаюсь просто паскалем только с++ только хардкор
Не нашли ответ?
Похожие вопросы