Komputerku

Berikut saya berikan contoh code untuk membuat formasi X dengan karakter '*', untuk codenya silahkan simak di bawah ini:
begin
     read(n);
     for i:=1 to n do
         begin
              for j:=1 to n do
                  begin
                       if (j=i) or (j=(n-i+1)) then
                          begin
                               write('*');
                          end
                       else
                           write(' ');
                  end;
              writeln;
         end;
end.