Untitled

 avatar
unknown
plain_text
a year ago
774 B
7
Indexable
program perhitungan_aritmatika;
{deklarasi}
var input_satu,input_dua,hasil:integer;
begin
  write('input 1 =');readln(input_satu)
  write('input 2 =');readln(input_dua);
  
  hasil:=input_satu+input_dua;
  writeln('penjumlahan ',input_satu,' + ',input_dua,' = ',hasi);
  
  hasil:=input_satu+input_dua;
  writeln('pengurangan ',input_satu,' - ',input_dua,' = ',hasi);
  
  hasil:=input_satu+input_dua;
  writeln('perkalian ',input_satu,' * ',input_dua,' = ',hasi);
  
  hasil:=input_satu+input_dua;
  writeln('pembagian ',input_satu,' / ',input_dua,' = ',hasi);
  
  hasil:=input_satu+input_dua;
  writeln('pembagian integer ',input_satu,' Div ',input_dua,' = ',hasi);
  
  hasil:=input_satu+input_dua;
  writeln('sisa bagi ',input_satu,' Mod ',input_dua,' = ',hasi);
end.

Editor is loading...