• Предмет: Информатика
  • Автор: kurbanahmedov8
  • Вопрос задан 7 лет назад

Написать программу, вычисления значения выражения: 1+1/2+1/3+1/4+⋯+1/10

Ответы

Ответ дал: Анжой
0

var

a:integer;

b:real;

begin

for a:=1 to 10 do b:=b+1/a;

writeln(b);

end.

Похожие вопросы