program keisan;
var
  a, b, seki, amari : Integer;
  x, y, syo : Real;
 
begin
  WriteLn('Aの値を入力してください:');
  ReadLn(a);
  WriteLn('Bの値を入力してください:');
  ReadLn(b);
 
  seki := a * b;
  amari := a mod b;
  x := a + b;
  y := a - b;
  syo := a / b;
 
  WriteLn('AとBの積は:', seki);
  WriteLn('AとBの和は:', x:5:2);
  WriteLn('AとBの差は:', y:5:2);
  WriteLn('AとBの商は:', syo:5:2);
  WriteLn('AをBで割った余りは:', amari);
end.
 

cHJvZ3JhbSBrZWlzYW47CnZhcgogIGEsIGIsIHNla2ksIGFtYXJpIDogSW50ZWdlcjsKICB4LCB5LCBzeW8gOiBSZWFsOwoKYmVnaW4KICBXcml0ZUxuKCdB44Gu5YCk44KS5YWl5Yqb44GX44Gm44GP44Gg44GV44GEOicpOwogIFJlYWRMbihhKTsKICBXcml0ZUxuKCdC44Gu5YCk44KS5YWl5Yqb44GX44Gm44GP44Gg44GV44GEOicpOwogIFJlYWRMbihiKTsKCiAgc2VraSA6PSBhICogYjsKICBhbWFyaSA6PSBhIG1vZCBiOwogIHggOj0gYSArIGI7CiAgeSA6PSBhIC0gYjsKICBzeW8gOj0gYSAvIGI7CgogIFdyaXRlTG4oJ0HjgahC44Gu56mN44GvOicsIHNla2kpOwogIFdyaXRlTG4oJ0HjgahC44Gu5ZKM44GvOicsIHg6NToyKTsKICBXcml0ZUxuKCdB44GoQuOBruW3ruOBrzonLCB5OjU6Mik7CiAgV3JpdGVMbignQeOBqELjga7llYbjga86Jywgc3lvOjU6Mik7CiAgV3JpdGVMbignQeOCkkLjgaflibLjgaPjgZ/kvZnjgorjga86JywgYW1hcmkpOwplbmQuCg==

MTAwCjk5

100
99