%Radius wird frei gewählt mit R = 1
R = 1;

%X und Y Ebene werden definiert
[X, Y] = meshgrid(-1:0.01:1);

%Elemente für Z werden mit Umformung der Formel R^2 = X^2 + Y^2 + Z^2 berechnet
Z = sqrt(R^2 - X.^2 - Y.^2);

%Darstellung der oberen Hälfte
surf(X, Y, real(Z), EdgeColor="none");
hold on;
%Darstellung der unteren Hälfte
surf(X, Y, real(-Z), EdgeColor="none");

axis equal;%Gleichmäßige Achsenverhältnisse
xlabel("X");
ylabel("Y");
zlabel("Z");
title("Kugeloberfläche");

annotation("textarrow", [0.2, 0.5], [0.6, 0.5], String="Mitte des Bildes");