WeightedGraphQ
WeightedGraphQ[g] yields True if the graph g is a weighted graph and False otherwise.
Examples
Check if graph is weighted:
WeightedGraphQ[Graph[{1 -> 2, 2 -> 3}, EdgeWeight -> {1, 2}]]Unweighted graph:
WeightedGraphQ[Graph[{1 -> 2, 2 -> 3}]]Please visit the official Wolfram Language Reference for more details.