Предмет: Информатика,
автор: TikTokCar
40 баллов
Построить программу в Pascal с циклической структурой
Дано натуральное число n. Вычислить:
2/1+3/2+4/3+... +(n+1)/n
Ответы
Автор ответа:
0
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
Интересные вопросы
Предмет: Геометрия,
автор: sofiakijko6
Предмет: Математика,
автор: nikitapuzik28
Предмет: Українська мова,
автор: gorowskamilana
Предмет: География,
автор: алинаLover
Предмет: Математика,
автор: Ильяфутбол