Подпрограммы-функции - PascalABC.NET
Формулировка задачи:
y=x3+4x2+x-2 на интервале [-1; 1] с шагом 0.1
Решение задачи: «Подпрограммы-функции»
textual
Листинг программы
function f(x: real): real;
begin
F := x*x*x+4*x*x+x-2
end;
var
a, b, h, x, y: real;
begin
a := -1; b := 1; h := 0.1;
writeln('':5, '<br>');
writeln('':5, '| x | y |');
writeln('':5, '-----------------');
x := a;
while x <= b + h / 2 do begin
y := f(x);
writeln('':5, '|', x:5:1, ' | ', y:7:4, '|');
x := x + h
end;
writeln('':5, '-----------------')
end.
Объяснение кода листинга программы
В данном коде:
- Объявлена функция с именем f(x: real): real;
- В функции f(x) вычисляется значение выражения xxx+4xx+x-2;
- Задаются значения переменных a, b, h, x, y: real;
- Выводится таблица с 5 столбцами, в которых будут выводиться значения x и y;
- Задаются начальные значения x и y;
- С помощью цикла while происходит вычисление и вывод значений x и y с шагом h;
- Выводится итоговая таблица с значениями x и y.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д