Selasa, 30 September 2014

TUGAS

 Tugas 1


   1. Perhatikan algoritma berikut ini.

KAMUS
     A, B, C, T : integer
BEGIN ALGORITMA
    T ß 0
    INPUT(A)
    T ß T + A
    INPUT(B)
    T ß T + B
    INPUT(C)
    T ß T + C
    OUTPUT(T)
END ALGORITMA

Berapakah nilai T, jika nilai A,B,C berturut-turut diINPUTkan dengan nilai 7, 5 dan 2 ? 14
Bahasa pascal:
uses crt;
var
        A:Integer;
        B:Integer;
        C:Integer;
        T:Integer;
BEGIN
        CLRSCR;
        T:=0;
        WRITELN('Masukan Nilai A: ');
        READLN(a);
        T:= T + A;
        WRITELN('Masukan Nilai B: ');
        READLN(b);
        T:= T + B;
        WRITELN('Masukan Nilai C: ');
        READLN(c);
        T:= T + C;
        WRITELN('Nilai Akhir T Adalah ',T);
        READLN();

Tidak ada komentar:

Posting Komentar