profile
Опубликовано 5 лет назад по предмету Информатика от pnatasha

решить задачу на языке pascal. Выполнить табуляцию функции, то есть: для
заданной  переменной  xÎ[-5;5]
с шагом h = 0,5 .
При всех значениях х  вычислить
значения функции y
=x3 +
20 cos2
2x    . Вывести в столбик х и соответствующий y. Использовать оператор
цикла repeat.  

  1. Ответ
    Ответ дан preceptor
    Program FuncTab;
    Const min = -5;
    max = 5;
    h = 0.5;
    Var x, y: Real;
    Begin
    x := min;
    Repeat
    y := x * x * x + 20 * Cos(2 * x) * Cos(2 * x);
    WriteLn(x:3:2, ' ', y:3:2);
    x := x + h;
    Until x > max;
    End.