Kamis, 16 Juni 2011

Responsi TI

Soal Responsi Mali Merge bisa dilihat disini


Soal Responsi Excel bisa dilihat disini


Soal Responsi matlab bisa dilihat disini


Soal Responsi Pascal bisa dilihat  disini

Pascal dan Matlab


a.    
Program Pengulangan_Bintang;
uses wincrt;
var i, n : integer;
begin
writeln ('PENGULANGAN BINTANG');
writeln;
for i:= 5 downto 1 do
    begin
    for n:= i downto 1 do
    write('*');
    writeln;
    end;
end.

 
Pengulangan Bintang










                                  


b.   
Program Nilai_Akhir_Ujian;
uses wincrt;
var nilai : integer;
    nama : string;
    NIM :real;

begin
writeln ('       NILAI AKHIR UJIAN  ');
writeln;
write ('Nama Mahasiswa      = '); readln(nama);
write ('NIM                            = '); readln(NIM);
write ('Nilai Yang Didapat     = '); readln (nilai);
write ('Nilai Yang Diberikan  = ');
if nilai > 80 then
write ('A');
if (nilai <=80) and (nilai >= 60) then
write ('B');
if nilai< 60 then
write ('C');
end.
 
Nilai Akhir Ujian



















1.Matlab
a.     Soal 1
>> A=[2,7,3,5;-2,2,1,4;0,1,9,2;3,4,2,1]

A =

     2     7     3     5
    -2     2     1     4
     0     1     9     2
     3     4     2     1

>> B=5*A

B =

    10    35    15    25
   -10    10     5    20
     0     5    45    10
    15    20    10     5
>> invers=inv(A)

invers =

   17.0000  -16.2857    1.0000  -21.8571
  -16.0000   15.2857   -1.0000   20.8571
   -2.0000    1.8571   -0.0000    2.5714
   17.0000  -16.0000    1.0000  -22.0000

>> Determinan=det(A)

Determinan =

    -7

>> Transpose=A'

Transpose =

     2    -2     0     3
     7     2     1     4
     3     1     9     2
     5     4     2     1


>> C=A^3

C =

    55   383   614   378
     6    71   144    78
    42   248   853   292
    40   254   407   247

>> D=A+B

D =

    12    42    18    30
   -12    12     6    24
     0     6    54    12
    18    24    12     6

b.    Soal 2
i.   Sistem Persamaan Linier 1
>> A=[2,-5,2,7;1,2,-4,3;3,-4,-6,5]
A =

     2    -5     2     7
     1     2    -4     3
     3    -4    -6     5

>> k1=A(:,1)

k1 =
     2
     1
     3

>> k2=A(:,2)

k2 =

    -5
     2
    -4

>> k3=A(:,3)

k3 =

     2
    -4
    -6

>> k4=A(:,4)

k4 =

     7
     3
     5
>> A=[k1 k2 k3]

A =

     2    -5     2
     1     2    -4
     3    -4    -6



>> det(A)

ans =

   -46

>> A1=[k4 k2 k3]

A1 =

     7    -5     2
     3     2    -4
     5    -4    -6

>> det(A1)

ans =

  -230

>> A2=[k1 k4 k3]

A2 =

     2     7     2
     1     3    -4
     3     5    -6

>> det(A2)

ans =

   -46

>> A3=[k1 k2 k4]

A3 =

     2    -5     7
     1     2     3
     3    -4     5

>> det(A3)

ans =

   -46

>> x=det(A1)/det(A)

x =

     5

>> y=det(A2)/det(A)

y =

     1

>> z=det(A3)/det(A)
z =
     1

Jadi solusi dari sistem persamaan linier tersebut adalah
X= 5
Y=1
Z=1
ii. Sistem Persamaan Linier 2
>> B=[2,3,1,6;1,1,2,4;3,4,3,9]

B =

     2     3     1     6
     1     1     2     4
     3     4     3     9
>> k1=B(:,1)

k1 =

     2
     1
     3

>> k2=B(:,2)

k2 =

     3
     1
     4

>> k3=B(:,3)

k3 =

     1
     2
     3



>> k4=B(:,4)

k4 =

     6
     4
     9
>> B=[k1 k2 k3]

B =

     2     3     1
     1     1     2
     3     4     3

>> det(B)

ans =

     0
>> B1=[k4 k2 k3]

B1 =

     6     3     1
     4     1     2
     9     4     3

>> det(B1)

ans =

    -5

>> B2=[k1 k4 k3]

B2 =

     2     6     1
     1     4     2
     3     9     3

>> det(B2)

ans =

     3

>> B3=[k1 k2 k4]

B3 =

     2     3     6
     1     1     4
     3     4     9

>> det(B3)

ans =

     1

>> x=det(B1)/det(B)

x =

  -Inf

>> y=det(B2)/det (B)

y =

   Inf

>> z=det(B3)/det(B)

z =

   Inf
            Jadi sistem persamaan linier tersebut adalah tak hingga.
 
DAFTAR NAMA POIN BELANJA
PRODUK UNGGULAN MASPION
UD. MMAJU MUNDUR
Jl. Diponegoro No. 50 Krian - Sidoarjo Telp (031) 590714








NO
NAMA
POIN
HADIAH
1
Wisya Astuti
60
Lemari Es
2
Susiana
48
Televisi 14
3
Ely Ernawati
35
Televisi 14
4
Ratna Antika
83
Lemari Es
5
Nisa Salsabila
77
Lemari Es
6
Sulistiyowati
41
Televisi 14
7
Dewi Purnamasari
95
Lemari Es
8
Cici Faramida
61
Lemari Es
9
Desy Ratnasari
36
Televisi 14
10
Cantika Febriananda
22
Televisi 14