Program Tenchuongtrinh;
Uses crt;
Var a,b:longint;
Begin
         Clrscr;
         Write('Nhap so a= '); readln(a);
         Write('Nhap so b= '); readln(b);
         Writeln('---------------------------');
         Writeln('Tong la: ',a+b);
         Writeln('Hieu la: ',a-b);
         Writeln('Tich la: ',a*b);
         Writeln('Thuong la: ',a/b:0:1);
         Readln;
End.