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