Предмет: Информатика,
автор: karinagfy2345
Дано натуральное n. Вычислить
2/1+3/2+4/3+...+n+1/n. ПОМОГИТЕ!!!
Ответы
Автор ответа:
4
program summa;
var
s:real;
i, n : integer;
begin
writeln('Введите число n= ');
read(n);
s:=0;
for i:=1 to n do
s:=s+(i+1)/i;
writeln('Сумма: ',s:4:2);
end.
Похожие вопросы
Предмет: Геометрия,
автор: irinazelinska128
Предмет: Математика,
автор: chasnochiQWQ
Предмет: Физкультура и спорт,
автор: Benkirill
Предмет: Математика,
автор: Hikit123
Предмет: Математика,
автор: gorbachevaRegina2005