Cum sa compari 2 numere in Pascal


In acest prim tutorial va voi prezenta structura de baza a unui program scris in Pascal si cum sa comparati 2 numere introduse de la tastatura.

Structura de baza a unui program este:

program nume_program;
{ Comentariile se scriu intre acolade }
{ Programul nu ia in considerare comentariile }
begin
{ Aici se scriu instructiunile programului }
end;


Dupa cum vedeti, este destul de simplu. Daca dorim sa citim 2 numere de la tastatura, sa le comparam si sa il afisam pe cel mai mare dintre ele, programul va arata asa:

program compara;
var a,b:integer;
begin
write('introdu primul numar : ');
readln(a);
write('introdu al doilea numar : ');
readln(b);
if a>b then
writeln('numarul mai mare este:',a)
else
writeln('numarul mai mare este:',b);
Readln;
end.

In primul rand remarcati ca am declarat variabilele la inceputul programului.

var a,b:integer;

Variabilele a si b sunt de tip intreg. Daca doream sa fie de tip real, inlocuiam cuvantul integer cu real. Daca doream sa fie de tip caracter, inlocuiam integer cu char.

In continuare citim cele 2 numere de la tastatura:

write('introdu primul numar : ');
readln(a);
write('introdu al doilea numar : ');
readln(b);

Functia write afiseaza pe ecran mesajul aflat intre ghilimele. Functia readln asteapta sa introduceti de la tastatura valoarea variabilei mentionate intre paranteze.

Numerele se compara in ultima parte a programului:

if a>b then
writeln('numarul mai mare este:',a)
else
writeln('numarul mai mare este:',b);

Programul vorbeste de la sine. Daca a este mai mare ca b, se va afisa valoarea lui a. Altfel se va afisa valoarea lui b.



Ti-a placut articolul Cum sa compari 2 numere in Pascal?

Ai nevoie de rezolvarea unei probleme la informatica?

Iti recomandam si urmatoarele articole:

Discuta articolul Cum sa compari 2 numere in Pascal



Contul tau

Categorii

Mozku Network

Ne gasesti si pe Facebook

Articole noi

Fisiere populare

  • Proiect Atestat Informatica Visual FoxPro (439)
  • Twitter Patterns (202)
  • Flash Newsletter (126)
  • hitTest Flash (99)
  • Baza de date auto revizuita (98)

Marcaje articole