[Skyline]

FreeBASIC Primer #1

Questo tutorial è destinato ai principianti, a coloro che stanno appena iniziando ad imparare a programmare ed a utilizzare FreeBASIC.

Imparare il linguaggio
Imparare un linguaggio di programmazione significa imparare le parole per scrivere e sapere cosa si intende quando si sono scritte. Non abbiamo bisogno di imparare tutto in una volta sola. Ma dobbiamo imparare alcune parole importanti che ci aiuteranno ad iniziare. In questo tutorial ci concentremo su queste parole chiave:

• Dim
  
• Print
  
• Input
  
• For….Next
  
• If...Then
  
• Do...Loop
  

Hello World!
Nessun riferimento per i principianti è completo senza questo esempio.

Codice:

Print "Hello World!"

Il testo fra le doppie virgolette è una stringa. Print è usato per stampare a schermo ciò che ce tra le doppie virgolette. È possibile modificare, compilare ed eseguire questo esempio, si è sulla buona
strada.

Utilizzo di una variabile per memorizzare i dati
A volte in un programma si vuole memorizzare alcune informazioni da qualche parte, in memoria, e poi utilizzarla in seguito. Per memorizzare qualcosa in memoria si usa una variabile. Tutte le variabili in FreeBASIC sono di un tipo specifico, come un numero o una stringa. Usiamo l'istruzione Dim per dichiarare un nome di una variabile e specificare il tipo di informazioni che vogliamo conservare in essa.

Codice:

Dim text As String
text = "Hello World!"
Print text

Stiamo usando Dim per dire al compilatore di usare una variabile denominata text nel nostro programma e che sarà di tipo String. Abbiamo quindi assegnato (copia) "Hello World!" alla variabile. Infine, abbiamo usato print per stampare a schermo.

Utilizzando una variabile in un'espressione
Un'espressione è un termine generico per descrivere una parte del codice sorgente che può essere valutato. Dopo che l'espressione viene valutata, possiamo fare qualcosa con esso, come assegnare (copia) una variabile.

Codice:

Dim a As String, b As String, text As String
a = "Hello"
b = "World"
text = a + " " + b + "!"
Print text

Stiamo assegnando alle variabili a e b alcuni dati. Stiamo quindi usando le variabili a e b in un'espressione che viene poi assegnato al text. Infine, stampiamo tutto con print.

Ottenere input dall'utente
Spesso, abbiamo bisogno che l'utente ci dia delle informazioni per fare delle particolari azioni, per esempio: possiamo chiedere all'utente il suo nome per poi stamparlo a schermo. Per fare ciò useremo la parola chiave: Input.

Codice:

Dim answer As String
Input "Type something and press enter:", answer
Print "You typed: '"; answer; "'"

Ecco la dichiarazione dell'input, che sarà la prima istruzione che il compilatore eseguirà, e successivamente stamperà tutto a schermo, quindi il programma attenderà che l'utente dia al programma i dati richiesti e poi stamperà tutto a schermo.

Fare po 'di matematica
Variabili e le espressioni non sono solo limitati alle stringhe. La maggior parte dei primi linguaggi non gestivano molto bene le stringhe se non del tutto. La scrittura delle espressioni matematiche è simile al modo in cui potrebbe essere scritto con carta e matita.

Codice:

Dim a As Integer, b As Integer, c As Integer
a = 5
b = 7
c = a + b
Print "a = "; a
Print "a = "; b
Print "a + b = "; c

Abbiamo assegnato dei valori alle variabili a, b, c. Stiamo utilizzando Integer (numeri interi) per il tipo di dati. Un numero intero può essere positivo o negativo.

Fare po 'di matematica con Input
Questo è simile al precedente esempio, tranne che permetterà all'utente di scegliere i numeri che stiamo andando ad aggiungere.

Codice:

Dim a As Integer, b As Integer, r As Integer
Input "Enter a number:", a
Input "Enter another number:", b
r = a + b
Print "The sum of the numbers is "; r

Dim dice al compilatore i nomi delle variabili che vogliamo usare e che stanno andando per contenere i dati Integer. Stiamo usando input per ottenere i numeri da parte dell'utente, e print per visualizzare i risultati.

Fare di più con Math Input
Le variabili numeriche non sono limitate ai soli numeri interi. Possiamo anche usarli per single o double precisione i tipi di dati che possono rappresentare le frazioni. In questo esempio prenderemo qualche input da parte dell'utente per convertire il peso in libbre a chilogrammi

Codice:

Dim lb As Single, kg As Single
Input "Enter a weight in pounds:", lb
kg = lb * 0.454
Print lb; " lb. is equal to "; kg; " kg"

Ripetizione di Bilancio
Utilizzo l'istruzione for ... Next si può dire al programma di fare qualcosa ripetutamente per un determinato numero di volte. Per esempio possiamo aggiungere i numeri da 1 a 100 in una variabile integer che contiene 0

Codice:

Dim total As Integer
Dim number As Integer
total = 0
For number = 1 To 100
total = total + number
Next
Print "The sum of number from 1 to 100 is "; total

Prendere una decisione
Un programma può scegliere quali istruzioni eseguire mediante un'istruzione condizionale come If ... Then. Siamo in grado di utilizzare il valore di una variabile o il risultato di un'espressione per decidere se si debba o non debba, eseguire una o più istruzioni.

Codice:

Dim number As Integer
Input "Enter a number : ", number
Print "Your number is ";
If number < 0 Then
Print "negative"
ElseIf number > 0 Then
Print "positive"
Else
Print "zero"
End If

Dopo aver ottenuto un numero da parte dell'utente, stamperemo una word (positivo, negativo o pari a zero) in base a quale condizione risulterà vera.

Dichiarazioni a ripetizione (di nuovo)
Qui useremo un'altra struttura del ciclo Do ... Loop per ripetere alcune dichiarazioni. Come sa il programma quando smettere di ripetere le dichiarazioni? Useremo If ... Then per prendere la decisione per uscire dal loop.

Codice:

Dim total As Single, count As Single, number As Single
Dim text As String
Print "This program will calculate the sum and average for a"
Print "list of numbers. Enter an empty value to end."
Print
Do
Input "Enter a number : ", text
If text = "" Then
Exit Do
End If
count = count + 1
total = total + Val(text)
Loop
Print
Print "You entered "; count; " numbers"
Print "The sum is "; total
If count <> 0 Then
Print "The average is "; total / count
End If

Tradotto da | Me
Tutorial Originale | Qui
Download | Qui

I file sorgente (. bas) ->

<- [FreeBASIC] Hello World