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