Borland Pascal, programele si aplicatii
Scris: 01 Noi 2010, 15:50
Pentru ca s-au deschis mai multe topicuri despre diferite limbaje de programare, si pentru ca fac la scoala, chiar daca C++ este mult mai bun, m-am gandit sa deschid acest topic despre Pascal.
PASCAL — definit în anul 1971 de catre Niklaus Wirth, a fost îmbunatatit în noi variante: Turbo Pascal, Borland Pascal, Delphi varianta vizuala. Versiunea actuala permite si programarea orientata spre obiecte
Eu o-sa vorbesc despre "Borland Pascal".
Incep cu un mic programel care calculeaza cel mai mare numar dintrun sir format din n numere introduse de la tastatura.
Compilatorul pe care il folosesc eu se poate descarca de aici, iar programul exemplu, versiune compilata se poate descarca de aici.
Un bun manual de pascal se poate gasi aici.
Astept intrebari, pareri si sugesti.
PS: sper ca m-am facut destul de inteles.
PASCAL — definit în anul 1971 de catre Niklaus Wirth, a fost îmbunatatit în noi variante: Turbo Pascal, Borland Pascal, Delphi varianta vizuala. Versiunea actuala permite si programarea orientata spre obiecte
Eu o-sa vorbesc despre "Borland Pascal".
Incep cu un mic programel care calculeaza cel mai mare numar dintrun sir format din n numere introduse de la tastatura.
Cod: Selectaţi tot
Program Maxim;
{Identificatorul de inceput, cu "program" incepe ori ce program pascal.}
uses wincrt;
{Declaram bliblioteca de functi wincrt.}
Var a,n,i,macs:integer;
{Am declarat variabilele a,i,n,macs cu tipul integer.}
begin {Inceput program.}
write('cate numere vor fi introduse');
{Aceasta este o instructiune de afisare si cand programul va fi rulat prima data se va cere"cate numere vor fi introduse?".}
readln(n);
{Se citeste o valoare pentru n.}
write('primul numar este: ');
readln(a);
macs:=a;
{macs ia valoarea lui a.}
for i:=1 to n do
{i ia valori de la 1 pana la n.}
begin {Aici este continutul structuri for.}
write('Introdu urmatorul numar');
readln(a);
{Se introduce urmatorul numar din sir.}
if a>macs then macs:=a;
{Se conpara a cu macs, daca a este mai mare atunci macs ia valoarea lui a. Noi asta trebue sa aflam, care este cel mai mare numar din sir.}
end; {Sfarsitul structuri repetitive.}
write(' cel mai mare numar este: ',macs);
{Din nou o instructiune de afisare.}
end. {Sfarsit program.}Un bun manual de pascal se poate gasi aici.
Astept intrebari, pareri si sugesti.
PS: sper ca m-am facut destul de inteles.