40 баллов
Построить программу в Pascal с циклической структурой
Дано натуральное число n. Вычислить:
2/1+3/2+4/3+... +(n+1)/n
Построить программу в Pascal с циклической структурой
Дано натуральное число n. Вычислить:
2/1+3/2+4/3+... +(n+1)/n
More Questions From This User See All
Answers & Comments
program raf105;
var
i,n: integer;
sum: real;
begin
write('n = ');
readln(n);
for i:=1 to n do
sum:= sum + (i+1)/i;
writeln('Вывод: ',sum);
end.
PascalABC 3.4.2