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

Ivanprofi22 Ivanprofi22    1   20.05.2019 23:40    1

Ответы
veros veros  14.06.2020 14:59

pascal

 

for i:=1 to n do

a=a+1/n;

writeln(a);

 

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

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

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

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика