% prog04.m
% H. Knoll
% 21.8.2001
%
% while - Anweisung
% Das Programm erzeugt 10 Würfelzahlen (1 - 6 zufällig).
%----------------------------------------------------------------------
clear all

n=1;
while n<=10
   z=round(rand(1)*5+1);
   disp(z)
   n=n+1;
end