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.
cHJvZ3JhbSBrZWlzYW47CnZhcgphLCBiLCBzZWtpLCBhbWFyaSA6IEludGVnZXI7CngsIHksIHN5byA6IFJlYWw7CgpiZWdpbgpXcml0ZUxuKCdB44Gu5YCk44KS5YWl5Yqb44GX44Gm44GP44Gg44GV44GEOicpOwpSZWFkTG4oYSk7CldyaXRlTG4oJ0Ljga7lgKTjgpLlhaXlipvjgZfjgabjgY/jgaDjgZXjgYQ6Jyk7ClJlYWRMbihiKTsKCnNla2kgOj0gYSAqIGI7CmFtYXJpIDo9IGEgbW9kIGI7CnggOj0gYSArIGI7CnkgOj0gYSAtIGI7CnN5byA6PSBhIC8gYjsKCldyaXRlTG4oJ0HjgahC44Gu56mN44GvOicsIHNla2kpOwpXcml0ZUxuKCdB44GoQuOBruWSjOOBrzonLCB4OjU6Mik7CldyaXRlTG4oJ0HjgahC44Gu5beu44GvOicsIHk6NToyKTsKV3JpdGVMbignQeOBqELjga7llYbjga86Jywgc3lvOjU6Mik7CldyaXRlTG4oJ0HjgpJC44Gn5Ymy44Gj44Gf5L2Z44KK44GvOicsIGFtYXJpKTsKZW5kLg==