Hacker's lair

Reply
Turbo pascal
view post Posted on 1/6/2009, 12:44Quote
Avatar

GDG

Group: Member
Posts: 331
Location: Paradiso.


Status: Offline: ultima azione eseguita il 12/12/2009, 18:28


Per la piccola programmazione io uso turbo PASCAL apri lo spoiler per scaricare (io l'ho preso dalla scuola)


INIZIAMO CON IL DIRE CHE IL TURBO PASCAL LAVORA IN DOS. (uso il caps per dare importanza a certe frasi.)

Oggi cosi perchè mi va di farlo vi insegnerò a programmare un programma che conta e che calcola il perimetro di un trapezio.

Ovviamente io cercherò di essere il più chiaro possibile ma non sono un professore e di sicuro qualcuno non comprenderà alla perferzione per tanto non voglio che si tiri indietro bensi che domandi.

Per poter programmare in qualunque linguaggio è necessario conoscere i codici mediante i quali possiamo esprimere i progetti che andremo a realizzare.
Il Turbo Pascal, come linguaggio di programmazione possiede un suo proprio codice espressivo con parole d'uso esclusivo per certe funzioni, queste parole le chiameremo parole riservate del Turbo Pascal.
Le parole riservate del Turbo Pascal (versione 6.0 o successive) sono:
CODICE
AND
ARRAY
BEGIN
CASE
CONST
DIV
DO  
DOWNTO
ELSE
END
FILE
FOR
FORWARD
FUNCTION
GOTO
IF
IN
LABEL
MOD
NIL
NOT
OF
OR
PACKED
PROCEDURE
PROGRAM
RECORD
REPEAT
SET
THEN
TO
TYPE
UNTIL
VAR
WHILE
WITH


Importantissime per la programmazione sono gli identificatori che sono parole che rappresentano costanti, variabili, tipi di dati, procedure, funzioni e alcuni altri dati. Esistono vari tipi di identificatori: predefiniti dal Turbo Pascal e quelli definiti dal programmatore.
Alcuni degli identificatori predefiniti sono: integer, real, byte, sin, ...

Gli identificatori definiti dal programmatore sono gli elementi aggiunti al linguaggio come variabili, procedure, funzioni, etc..

Un identificatore è una sequenza da 1 a 127 caratteri, che inizia con una lettera, non contiene spazi nè simboli speciali: &, !, *, etc. e non è una parole riservata.

Per il Turbo Pascal non esistono differenze tra maiuscole e minuscole, così che un identificatore denominato "valor" si può anche riferire come "VALOR" o "VaLoR".

Tutti gli identificatori in Pascal devono essere definiti prima di utilizzarli.

DOPO questa introduzione passiamo alla programmazione vera e propria. Iniziamo con il programmare il nostro calcolatore del perimetro del trapezio.

Apriamo il Turbo Pascal Appena scaricate e facciamo l' installazione.

Ora nell' enorme finestra dalla grafica sgradevole XD troviamo in alto dei menu a tendina Andiamo su File--> New

E nella schermata blu copiamo questo codice (basta sapere l' inglese che il significato viene fuori)
CODICE
program trapezio;
uses crt;
var b1,b2,h,c,lato,area,2p:real;
begin
clrscr;
writeln('introduci la misura della base maggiore');
readln(b1);
writeln('introduci la misura della base minore');
readln(b2);
writeln('introduci l"altezza');
readln(h);
c:=(b1-b2)/2;
lato:=sqrt [(sqr(c))+(sqr(h))];
area:=[(b1+b2)*h]/2;
writeln('l"area è',area:0:2);
2p:=b1+b2 +( lato*2);
writeln('il perimetro è',2p:0:2);
readln;
end.


Dopo di che andiamo sul menù a tendina e scegliamo RUN --> Run (ctrl + f9)

Se è tutto OK procediamo al salvataggio:
File--> Save As... (e poi sapete fare spero)

Ed il nostro programma è completo, ora passiamo al calcolatore solo per i numeri naturali:


Apriamo una nuova pagina cliccando su file--NEW e inserite il seguente codice

CODICE
PROGRAM ESPRESSIONE;
USES CRT;
VAR X,RISULTATO: REAL;
BEGIN;
CLRSCR;
WRITE('DAMMI IL VALORE DI X=');
READLN (X);
RISULTATO:= 3*SQR(X) +4*X-1
WRITLN (' IL RISULTATO E', RISULTATO);
READLN
AND

Anche il nostro calcolatore è fatto ora andiamo di nuovo su Run (ctrl + f9), Controlliamo il funzionamento e salviamo.

NB: Ricordatevi sempre il ";" ogni volta che andate a capo !!!
E' SEMPRE PREFERIBILE SCRIVERE CON IL CAPS NEL PASCAL.



Spero di essere stato utile a tutti voi.
Per domande postate di seguito.


Edited by Spywer - 1/6/2009, 14:10

image
 
P_MSG P_EMAIL Top
0 replies since 1/6/2009, 12:44
 
Reply

load
Fast reply

 
 
 

Enable emoticons
Clickable Smilies
Show All


Nickname:      Email:



 

 
 




Affiliazioni
Image and video hosting by TinyPic
 



Skin by Cole my love