Задать вопрос
23 августа, 14:32

Pascal:

Для заданной функции Y=10*LnX, где значение Х изменяется от 10 до 80 с шагом 10: вычислить сумму полученных значений.

+4
Ответы (1)
  1. 23 августа, 18:26
    0
    Program pr;

    uses crt;

    Var sum, x, y:real;

    Begin

    x:=10;

    sum:=0;

    While x<=80 do

    Begin

    y:=10*ln (x);

    sum:=sum+y;

    x:=x+10;

    end;

    Writeln ('Cумма = ', sum);

    readln;

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Pascal: Для заданной функции Y=10*LnX, где значение Х изменяется от 10 до 80 с шагом 10: вычислить сумму полученных значений. ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы