Mám licenciu Win 10 alebo nie?

Máš operační systém uvedený na faktuře? Ne? Tak jsi ho nekoupil.

Aha jasne.
Je teda možné Enterprise nejak jednoducho zmeniť na PRO, alebo je nutná reinštalácia celého OS?

Ne, pouze zadáš nový klíč, který dostaneš.

Jestli tam máš opravdu Win 10 Enterprise LTSC tak ta změnit na klasické edice (např. Pro, Enterprise...) zadáním klíče nejde a je potřeba reinstal.

Kvůli té ořezané variantě LTSC? Klasická Enterprise by šla, ne?

https://www.majorgeeks.com/content/page/how_to_downgrade_from_windows_10_enterprise_to_windows_10_pro.html

U klasické Enterprise by změna na Pro šla, ale předpokládám, že on podle dotazu v úvodním příspěvku řeší Enterprise LTSC, jen to v tom posledním příspěvku zapomněl napsat. A Enterprise LTSC změnit pomocí klíče na Pro nejde, nejde ji změnit ani na Enterprise.
Na které edice jde nainstalovaný Windows změnit lze zjistit příkazem:
Dism /Online /Get-TargetEditions

To bežný občan bez základných znalostí a miernych skúseností s Windows nezistí, či predávajúca strana aktivovala OS nejakým digitálnym aktivátorom, napríklad: https://free.appnee.com/w10-digital-license-c-sharp/

Okpčí text pod perforovanou čiarou a vraz ho do Notepad.exe, ulož súbor s príponou *.vbs na plochu. Po spustení, klik myšou, ti ponúkne skriptové okno uloženie ID HW a key na plochu.

Neupejpej se a daj sem verejne tieto tri údaje.

Product Name: Windows 10 XXX
Product ID: 00330-xxxxx-xxxxx-xxxxxx
Installed Key: xxxxxx-xxxxx-xxxxx-xxxxx-xxxxx
-------------------------------------------------------------

Option Explicit
Dim objshell,path,DigitalID, Result
Set objshell = CreateObject("WScript.Shell")
'Set registry key path
Path = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\"
'Registry key value
DigitalID = objshell.RegRead(Path & "DigitalProductId")
Dim ProductName,ProductID,ProductKey,ProductData
'Get ProductName, ProductID, ProductKey
ProductName = "Product Name: " & objshell.RegRead(Path & "ProductName")
ProductID = "Product ID: " & objshell.RegRead(Path & "ProductID")
ProductKey = "Installed Key: " & ConvertToKey(DigitalID)
ProductData = ProductName & vbNewLine & ProductID & vbNewLine & ProductKey
'Show messbox if save to a file
If vbYes = MsgBox(ProductData & vblf & vblf & "Save to a file?", vbYesNo + vbQuestion, "BackUp Windows Key Information") then
Save ProductData
End If
'Convert binary to chars
Function ConvertToKey(Key)
Const KeyOffset = 52
Dim isWin8, Maps, i, j, Current, KeyOutput, Last, keypart1, insert
'Check if OS is Windows 8
isWin8 = (Key(66) \ 6) And 1
Key(66) = (Key(66) And &HF7) Or ((isWin8 And 2) * 4)
i = 24
Maps = "BCDFGHJKMPQRTVWXY2346789"
Do
Current= 0
j = 14
Do
Current = Current* 256
Current = Key(j + KeyOffset) + Current
Key(j + KeyOffset) = (Current \ 24)
Current=Current Mod 24
j = j -1
Loop While j >= 0
i = i -1
KeyOutput = Mid(Maps,Current+ 1, 1) & KeyOutput
Last = Current
Loop While i >= 0
keypart1 = Mid(KeyOutput, 2, Last)
insert = "N"
KeyOutput = Replace(KeyOutput, keypart1, keypart1 & insert, 2, 1, 0)
If Last = 0 Then KeyOutput = insert & KeyOutput
ConvertToKey = Mid(KeyOutput, 1, 5) & "-" & Mid(KeyOutput, 6, 5) & "-" & Mid(KeyOutput, 11, 5) & "-" & Mid(KeyOutput, 16, 5) & "-" & Mid(KeyOutput, 21, 5)
End Function
'Save data to a file
Function Save(Data)
Dim fso, fName, txt,objshell,UserName
Set objshell = CreateObject("wscript.shell")
'Get current user name
UserName = objshell.ExpandEnvironmentStrings("%UserName%")
'Create a text file on desktop
fName = "C:\Users\" & UserName & "\Desktop\WindowsKey.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
Set txt = fso.CreateTextFile(fName)
txt.Writeline Data
txt.Close
End Function