tugas 9

 Tugas 9

    Perhatikan penggalan  algoritma berikut ini:

M ß 2 ; Q ß 10
IF (M < 5) THEN
     M ß M + 2
ENDIF
IF (M >= 5) THEN
   Q ß M + Q
ENDIF
OUTPUT(Q,M)
            Berapa nilai akhir Q dan M ? M:4,Q:10
Dalam Bahasa Pascal:
uses crt;
Var
        M:Integer;
        q:Integer;
BEGIN
        CLRSCR;
        M:= 2;
        Q:=10;
        If(M<5) Then M:= M+2;
        If(M>=5) Then q:= M + Q;
        WRITELN('Nilai Akhir M: ',M);
        WRITELN('Nilai Akhir Q: ',q);
        READLN();
End.