Вычислить сумму ряда чисел 1+1/2+1/3++1/n,где n вводится - вопрос №1121313369435 от Derve 18.05.2021 22:34

Question

Информатика: Вычислить сумму ряда чисел 1+1/2+1/3++1/n,где n вводится пользователем

Derve · Answer

Vari,n:integer;s:real;beginwriteln( Введите n );readln(n);for i:=1 to n dos:=s+(1/i);writeln(s);end....