Forum Eks Grupy…

disp('test z tabliczki mnozenia';
Lt=input('podaj liczbetestow(minimum 10)='
while Lt<10
Lt=input('minimum 10 testow='
end
rand('state',sum(100*clock));
for t=1:Lt
a=round(10*rand);
b=round(10*rand);
odp=input(strcat(num2str(a),'*',num2str(b),'=');
mn=size(odp);
if mn==[1 1]
if odp==a*b
pkt=pkt+2;
disp(strcat('Dobrze -masz:',num2str(pkt),'pkt')
else
pkt=pkt-1;
disp(strcat('zle -masz:',num2str(pkt),'pkt.')
end
else
disp('otrzymujesz 0 pkt.';
end
end