program ContohBilanganBulat;
uses crt;
var
  angka1, angka2, hasilSum, hasilDiv: Integer; // Deklarasi tipe data integer
begin
  clrscr;
  angka1 := 10;
  angka2 := 3;

  // Penjumlahan
  hasilSum := angka1 + angka2; // Hasil: 13
  
  // Pembagian Bulat (div)
  hasilDiv := angka1 div angka2; // Hasil: 3 (sisa dibuang)

  writeln('Angka 1: ', angka1);
  writeln('Angka 2: ', angka2);
  writeln('Hasil Penjumlahan: ', hasilSum);
  writeln('Hasil Pembagian (div): ', hasilDiv);
  
  readln;
end.