Gyakorló feladat kiválasztásra: Tömb feltöltése n darab véletlen számmal és legkisebb elem kiválasztása program Minimum; uses crt; var i,n:integer; a:array [1..100] of integer; BEGIN clrscr; n:= ; i:=1; writeln('A tomb a rendezes elott'); while (i<=n) do begin a[i]:=trunc(*random+1); i:=i+1; writeln('A tomb ',i,'. eleme:',a[i]); end; min:=a[]; i:=; while (i<=n) do begin if (a[i]<min) then begin min:=a[i]; end; i:=i+; end; writeln('Legkisebb szam: ', ); end; END.