CLS
INPUT "totale = ", Tot
k = 100 / Tot

Introduzione:
INPUT "dato = ", dato
PRINT dato * k
GOTO Introduzione