% Define the area function
x = 0:0.01:1200;

A = zeros(1, length(x));

for i = 1:length(x)

    A(i) = 2400* x(i) -2* x(i)^2;

end


% Plot the graph
plot(x, A, 'LineWidth', 2);
xlabel('x');
ylabel('Area');
title('Area Function');

--------------------------------------------
% Define the area function
w = 0:0.01:10;

C = zeros(1, length(w));

for i = 1:length(w)

    C(i) = 60* w(i)^2 +800/w(i);

end


% Plot the graph
plot(w, C, 'LineWidth', 2);
xlabel('x');
ylabel('Cost');
title('Cost Function');
-------------------------------------------------
% Define the area function
x = 0:0.01:4;


A = zeros(1, length(x));

for i = 1:length(x)

    A(i) = 4 * x(i) * sqrt(16 - x(i)^2);

end


% Plot the graph
plot(x, A, 'LineWidth', 2);
xlabel('x');
ylabel('Area');
title('Area Function');