Даны действительное a и натуральное n. вычислить: - вопрос №162752611213141 от hovrashok 20.01.2021 02:09

Question

Информатика: Даны действительное a и натуральное n. вычислить: 1 + 1/2 + 1/3 +1/4 + … + 1/n;

hovrashok · Answer

pascal

for i:=1 to n do

a=a+1/n;

writeln(a);

если не сработает измени i:=1 на i:=0

я не занимаюсь просто паскалем

только с++ только хардкор