Вычислить сумму ряда чисел 1+1/2+1/3++1/n,где n вводится - вопрос №1121313369260 от mamanazaruz60 30.01.2023 16:14

Question

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

mamanazaruz60 · Answer

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