tugas 11

 Tugas 11

    Diketahui A berisi 25, B berisi 13 dan C berisi 37, dijalankan algoritma

            B ß A
     C ß B
     A ß C
     OUTPUT(A)
            Keluaran dari program diatas adalah 25
Dalam Bahasa Pascal:

uses crt;
Var
        A:Integer;
        B:Integer;
        C:Integer;
BEGIN
        CLRSCR;
        WRITELN('Isi A: ');
        READLN(a);
        WRITELN('Isi B: ');
        READLN(B);
        WRITELN('Isi C: ');
        READLN(C);
        CLRSCR;
        B:= A;
        C:= B;
        A:= C;
        WRITELN('Isi A: ',A);
        READLN();

End.