Program P0102;
{progarm untuk menghitung penjumlahan
bilangan bulat}
uses
crt;
var
a,b,c:integer;
begin
clrscr;
writeln('*************************************************');
writeln('* program menghitung penjumlahan bilangan bulat *');
writeln('*************************************************');
write('masukan bilangan pertama:'); readln (a);
write('masukan bilangan kedua
:'); readln (b);
c:=a+b;
writeln('jadi penjumlahan kedua bilangan bulat di atas adalah:',c);
readln;
end.