Помогите пожалуйста! задача по теме «Цикл с параметром».в паскаль 3+4/2+5/3+...+11/9 количество знаков после десятичной точки 5
Помогите пожалуйста! задача по теме «Цикл с параметром».в паскаль 3+4/2+5/3+...+11/9 количество знаков после десятичной точки 5
Гость
Ответ(ы) на вопрос:
ГостьProgram Zadacha;
Var a, b, i: Integer;
sum: Real;
Begin
a := 3;
b := 1;
sum := 0;
For i := 1 To 8 Do
Begin
sum := sum + a / b;
a := a + 1;
b := b + 1;
End;
WriteLn('Результат: ', sum:2:5);
ReadLn;
End.
Не нашли ответ?
Похожие вопросы