Instuctiuni in limbajul de programare Pascal
1.INSTRUCTIUNI ALTERNATIVE
CAP 1:Instructiunea conditionata IF
Sintaxa instructiunii
IF THEN
;
SAU
IF THEN
ELSE
;
PRINCIPIU DE FUNCTIONARE
-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
