Евгений2391
22.05.2022 18:48

2/3+3/4+4/+10/11 составить программу в паскале

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
gleb21717
21.08.2020 07:22
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

Вариант 1. Приблизительное решение.

begin
  Writeln('S=',2.To(10).Select(t->t/(t+1)).Sum)
end.

Результат
S=7.48012265512266

Вариант 2. Точное решение

uses NumLibABC;

begin
  var s:=Frc(0);
  for var i:=2 to 10 do s+=Frc(i,i+1);
  Writeln('Точное значение ',s,', приближенное ',s.ToReal)
end.

Результат
Точное значение 207349/27720, приближенное 7.48012265512266
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота