Помогите пожалуйста написать код на Паскале!!!!

Конечно! Вот примеры программ на Паскале, которые вычисляют значение функции f(x) = 3x² + 4x - 5 и затем суммируют результаты f(4) + f(-5) . Мы создадим две программы: одну с использованием функции, а другую с использованием процедуры.

▎Программа с использованием функции

program FunctionExample;

function f(x: Integer): Integer;
begin
f := 3 * x * x + 4 * x - 5; // Вычисление функции
end;

var
result: Integer;

begin
result := f(4) + f(-5); // Вычисление f(4) + f(-5)
WriteLn('f(4) + f(-5) = ', result); // Вывод результата
end.


▎Программа с использованием процедуры

program ProcedureExample;

procedure f(x: Integer; var result: Integer);
begin
result := 3 * x * x + 4 * x - 5; // Вычисление функции и сохранение результата
end;

var
result1, result2, total: Integer;

begin
f(4, result1); // Вычисление f(4)
f(-5, result2); // Вычисление f(-5)
total := result1 + result2; // Суммирование результатов
WriteLn('f(4) + f(-5) = ', total); // Вывод результата
end.


▎Объяснение

1. Первая программа использует функцию f, которая принимает целочисленный аргумент x и возвращает значение функции. Затем программа вычисляет сумму значений функции для x = 4 и x = -5.

2. Вторая программа использует процедуру f, которая принимает два аргумента: целочисленный x и переменную result, в которую записывается результат вычисления функции. Затем программа вызывает процедуру дважды и суммирует результаты.

Запустите любую из этих программ в среде разработки Паскаля, чтобы получить ответ.