informa
clc;
clear all;
pkt=0;
disp('Test z tabliczki mnozenia');
Lt=input('Podaj liczbe testow (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;
disp(strcat('Uzyskano: ',num2str(pkt),' pkt. na',num2str(2*Lt),' mozliwych'));
ocena=4*pkt/Lt/2+1;
if ocena<1
ocena=1;
end
if ocena>=3
disp('Test zaliczony');
else
disp('Test niezaliczony');
end
disp(strcat('Ocena koncowa: ',sprintf('%4.1f',ocena)));


  PRZEJD NA FORUM