esercitazioni con Turbo Basic
esci turboba.htm
sintassi varia, numeri, stringhe, vettori
rem sole5
rem uso di array cfr.TBAS1
cls
h$="--------------------------------------------------"
print"array numerico con 6 elementi)
print h$
DIM numeri(1:6)
for a=1 to 6
print"elemento n.";a;:input" :valore
intero=", numeri(a)
next a
print"stampa elementi array "
for a=1 to 6
print numeri(a)
next a
print h$
print"stampa singoli elementi 1,3)
print numeri(1),numeri(3)
print h$
print"array stringa con 6 elementi"
print h$
DIM parola$(1:6)
for a=1 to 6
print"elemento
n.";a;:input":stringa=";parola$(a)
next a
print"stampa elementi array"
for a=1 to 6
print parola$(a)
next a
print"stampa singoli elementi:2,3)
print parola$(2),parola$(3)
print h$
end