ĐÁP án đề THI TIN học CHUYÊN NGÀNH máy tàu BIỂN 2

Bai1 function bai1 a=input('Hay nhap so xap xi a= '); dentaa1=input('Hay nhap sai so tuyet doi gioi han : '); ('Sai so tuong doi gioi han la:'),dentaa1/a Bµi function bai2 a=input('Hay nhap so xap xi:'); dentaa1=input('Hay nhap sai so tuyet doi gioi han:'); b=num2str(a,10); n=size(b); k=n(2)+1; i=1; %Xac dinh chu so a co phai la chu so thap phan khong while (i0) & (b(i)~='0') i=i-1; end k=i; t=true; % Thu tuc nhap vij tri so can lam tron while t==true d=input('Nhap thu tu chu so co nghia ma ta muon lam tron:'); if (d >= k) & (d = h if m>=5 disp(num2str(str2num(b(1:(d+1)))+1*10^(h-d-1))); else disp(b(1:(d+1))); end end Bµi function bai4; d=input('Nhap so xap xi d cua duong kinh hinh tron:'); dentad1=-1; while dentad1 < dentad1=input('Nhap sai so tuyet doi gioi han cua d:'); end disp('Sai so tuyet doi gioi han cua the tich hinh cau la:'); dentav1 = (d^3)*0.0016/6 + (3.14*(d^2)*dentad1)/2; disp(dentav1); disp('Sai so tuong doi gioi han cua the tich hinh cau la:'); xicmav=dentav1/(1/6*3.14*d^3); disp(xicmav); Bµi unction bai5 n=input('Nhap so cac so xap xi:'); t=true; while t==true k=0; for i=1:n x(i)=input(['Nhap so xap xi x',num2str(i),': ']); k=k+x(i); end if k~=0 t=false; else disp('Ban nen nhap lai cac so xap xi:'); end end z=x; % Thu tuc xac dinh so mu cua so chu so cuoi cung so xap xi for i=1:n b=num2str(z(i)); c=size(b); h=c(2); j=1; % Thu tuc xac dinh dau , cua chu so xap xi o vij tri nao while (j