Ro/Rodin/Alte exemple

{	text "Dati lungimea vectorului";
 
	citeste n;
 
	pentru (fie x=0; x<n; fie x=x+1)
 
		fie v[x]=0;
 
	pentru (fie x=0; x<n; fie x=x+1)
 
		{citeste y;fie v[x]=y;};
 
	fie xmin=0;
 
	fie xmax=0;
 
	pentru (fie x=0; x<n; fie x=x+1)
 
		{daca (xmin>v[x]) atunci fie xmin=v[x];
 
							altfel fie xmin=xmin;};
 
        pentru (fie x=0; x<n; fie x=x+1)
 
		{daca (xmax<v[x]) atunci fie xmax=v[x];
 
							altfel xmax=xmax;};
 
	text "Minimul din sir este";
 
	scrie xmin;
 
	text "Maximul din sir este";
 
	scrie xmax;
 
	citeste j;
 
	};