Даны действительное a и натуральное n. вычислить: - вопрос №112131411626849 от lika771 31.12.2022 20:11

Question

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

lika771 · Answer

pascal

for i:=1 to n do

a=a+1/n;

writeln(a);

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

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

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