РЕШИТЕ В PASCAL ABC пожалуйста.напечатайте таблицу значений функции y=x^3+3 при изменении...

0 голосов
73 просмотров

РЕШИТЕ В PASCAL ABC пожалуйста.напечатайте таблицу значений функции y=x^3+3 при изменении x от 2 до 12 с шагом 2
Задача Номер 2.


image

Информатика (65 баллов) | 73 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

//PascalABC.Net 3.1.0.1200
var
    x0, xk, dx, x: real;

function f(x: real): real;
begin
    f := x * x * x + 3;
end;

begin
    write('Введите промежуток и шаг ([a,b] h) ');
    readln(x0, xk, dx);
    
    x := x0;
    writeln(' x ':10, ' | ', ' f(x) ':10);
    
    repeat
        writeln(x:10:3, ' | ', f(x):10:3);
        x := x + dx;
    until x > xk;
end.

(55.0k баллов)
0

Что не так?