[Konrad]

PHP код:

memo1.Lines.add(inttostr(round(random*5+1)));