Rabu, 01 Oktober 2014

tugas 28

 Tugas 28
1.       Diberikan potongan algoritma sbb :

INPUT(N)
IF N>10 THEN
                N <-- N + 5
END IF
OUTPUT(N)

Jika dari perintah INPUT(N), dimasukkan data 5,
maka tampilan dari OUTPUT(N) adalah 5
Dalam Bahasa Pascal
Uses crt;
var
        N:integer;
Begin
        CLRSCR;
        WRITELN('Masukan BilanganL: ');
        READLN(N);
        If (N>10) then N := N + 5;
        WRITELN('Nilai Akhir N: ',N);
        READLN();

End.

Tidak ada komentar:

Posting Komentar