TUGAS 3

 Tugas 3


    Perhatikan penggalan algoritma dibawah ini:

Algoritma
     …….
     IF (a = 10 and b = 5) THEN
          c <-- 156
     ELSE
          c <-- 165
     END IF
   
Jika ternyata variabel  a  diberikan INPUT 5, maka nilai variabel  c  adalah?165
Bahasa Pascal:
uses crt;
Var
        A:Integer;
        B:Integer;
        C:Integer;
BEGIN
        CLRSCR;
        WRITELN('Masukan Nilai A: ');
        READLN(a);
        WRITELN('Masukan Nilai B: ');
        READLN(b);
        If (a=10) and (B=5) Then C:= 156
        Else
                C:= 165;
        WRITELN('Nilai C adalah ',c);
        READLN();
End.165