% 2.gyakorló feladat (ZH előtti feladatsor)

a = linspace(0, 10, 1000);
b = 25 - a/4*pi - a/2; % Kerület képletéből
terulet = a .* b - a.^2 / 8 * pi;

hold on
plot(a, terulet, 'b-')
title('2.feladat', 'FontSize', 16)
xlabel('a', 'FontWeight', 'bold', 'FontSize', 12)
ylabel('területérték', 'FontWeight', 'bold', 'FontSize', 12)

max_T = max(terulet)
max_a = a(find(terulet == max_T))
max_b = b(find(terulet == max_T))

plot(max_a, max_T, 'ro')