program z106;
uses crt;
const m=5;
var a:array[1..m] of integer;
i,j,k:integer;
Begin
randomize;
for i:=1 to 5 do begin
a[i]:=random(5)+1;end;
END.