Selasa, 30 September 2014

TUGAS 4

 Tugas 4

Perhatikan algoritma berikut ini.
KAMUS
  A, B : integer
  C : Boolean
BEGIN ALGORITMA
  A ß 0 ; B ß 2
  A ß B ; B ß A + A
  C ß ((A > B) AND (A <> 2))
  OUTPUT (C)
END ALGORITMA

Berapa nilai C ? False
Dalam Bahasa Pascal:
uses crt;
Var
        A:Integer;
        B:Integer;
        C:Boolean;
BEGIN
        CLRSCR;
        A:= 0;
        B:= 2;
        A:= B;
        B:= a + a;
        C:= (a>b) and (a=2);
        WRITELN('Nilai C: ',c);
        READLN();
End.

Tidak ada komentar:

Posting Komentar