Principiu de functionare in Pascal



-daca conditia este adevarata,se executa secventa de instructiuni situata pe ramura lui THEN;
-daca conditia este falsa,se executa secventa de pe ramura lui ELSE in cazul in care aceasta exista;altfel se trece la instructiunea imediat urmatoare.

Observatii:
Daca secventele cuprind mai mult de 2 instructiuni,acestea trebuie cuprinse intre BEGIN si END;
Inainte de ELSE nu se pune ’’ ; ”.

Exemple de probleme in care este folosita instructiunea IF


1) Sa se scrie un program care calculeaza f(x) pentru x numar natural dat.


f(x)=



program functie;
var x,f:integer;
begin
writeln (’x=’);readln (x);
if x> 1 then
f:= 2*x –1
else
f:= 1+x;
writeln( ’valoarea lui f=’, f:4);
readln;
end.

2)Sa se calculeze aria unui triungi pentru care se cunosc lungimea bazei si a inaltimii.

program arie1;
var b,h:integer;
begin
writeln (’b=’);readln (b);
writeln (’h=’);readln (h);
if (b>0) and (h>0) then
writeln (’aria este=’, b*h/2);
readln;
end.
3) Sa se calculeze aria unui romb ale carui diagonale se cunosc.


program arie2;
var d1,d2:integer;
begin
writeln (’d1=’);readln (d1);
writeln (’d2=’);readln (d2);
if (d1>0) and (d2>0) then
writeln (‚aria este=’, d1*d2/2);
readln;
end.



CAP2:Instructiunea de selectie CASE



Sintaxa instructiunii


CASE OF CASE OF
: ; : ;
: ; : ;
. SAU .
. .
. .
: : ;
ELSE END;
:
END;
PRINCIPIU DE FUNCTIONARE


-daca variabila selector ia valoarea se executa ,daca variabila selector ia valoarea , se executa ...daca variabila selector ia valoarea ,se executa ;
-daca variabila selector nu ia nici una dintre aceste valori,nu se executa instructiunea CASE si se trece la secventa imediat urmatoare.

Observatii :

1)variabila selector poate fi de tip:BYTE,WORD,INTEGER,CHARACTER,LONGINT sau un tip definit de utilizator;
2)daca contin mai mult de 2 instructiuni,secventele