Program penjumlahan;
{I.S : Diberikan Layar kosong}
{F.S : Menampilkan hasil penjumlahan x+y}
Uses wincrt;
Var
a,b,c,z: Integer;
Begin
Clrscr;
Writeln('Penjumlahan 3 Bilangan');
Write('Masukan Nilai pertama: ');readln(a);
Write('Masukan Nilai kedua : ');readln(b);
write('Masukan Nilai Ketiga :');readln(c);
z:= a+b+c;
writeln('Hasil Penjumlahan adalah : ',z);readln;
End.
output
