Kalkulator Sederhana

Program Kalkulator_Sederhana;
uses crt;

var
    a, b: Integer;
    hasil: LongInt;
    hasil2: Real;

begin
    writeln( 'Kalkulator Sederhana' );
    write( 'Masukkan Angka: ' );
    readln( a );
    write( 'Masukkan Angka: ' );
    readln( b );
    hasil := a + b;
    writeln( 'Hasil dari ', a, ' + ', b, ' adalah ', hasil );
    hasil := a - b;
    writeln( 'Hasil dari ', a, ' - ', b, ' adalah ', hasil );
    hasil := a * b;
    writeln( 'Hasil dari ', a, ' * ', b, ' adalah ', hasil );
    hasil2 := a / b;
    writeln( 'Hasil dari ', a, ' / ', b, ' adalah ', hasil2 );
end.